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Globe-trotter à la recherche d’une civili- 
sation disparue, tu parcours le monde 
malgré les nombreux obstacles qui se 

dressent sur ton chemin. De grandes 
puissances t’enverront leurs combat- 
tants pour te stopper dans ta quête. La 
force seule ne suffira pas et tu devras 

faire preuve d'intelligence et d’astuce 


pour découvrir enfin ce que tu as tant 


cherché. 


LE PACTE 
En l’an 1580 de notre ère, la Grande 
Alliance des forces du bien permit un 
Pacte sans précédent avec la nuit, 
le mal et les démons. 
Depuis 3 siècles déjà, les puissan- 
ces diaboliques reposent en un 
coffret, sépulture inviolée les rete- 
nant prisonnières à jamais. TOI 
MORTEL., tu ne dois jamais l’ou- 
vrir sous peine d’avoir à les 
combattre. 


Une nouvelle génération de softs 


À 7a dtout fracasser !!! 


S° TOP SECRET 
#f Un coup d'état 


, dans ton pays!!! 

. [n'y a pas une mi- 

. nute à perdre pour 
sauver le président. 

. Vite prends ton arme 
| et lance-toi dans 
. une folle course- 
, poursuite à travers 

_ la ville où règnent 
| l'angoisse et la vio- 
k\ lence. 
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C. Delannoy. 152 pages. 
Réf. El 
Ce livre est écrit dans un langage très simple. La 
démarche est progressive, chaque notion est pré- 
sentée sur un exemple simple accompagnée de 
nombreux exercices. L'auteur nous familiarise avec 
les erreurs possibles. 


sir 


PROGRAMMATION SUR AMSTRAD 
PCW Dole Basic et fichiers. 


Prades its at e0-06is fe 0 De das 149F 
Cet ouvrage est écrit selon une progression éprou- 
vée en cours. 

Il est destiné à intéresser le débutant puisque conçu 
dans un souci didactique, en supposant la program- 
mation inconnue, et en même temps susceptible 
d'intéresser le programmeur confirmé avec l'impor- 
tant chapitre réservé aux fichiers. En effet, le lan- 
gage Basic de l'AMSTRAD PCW 8288/8812 utilise 


JETSAM. 

Le livre est divisé en neuf chapitres qui se terminent 
tous par une série d'exercices dont la solution est 
toujours commentée et expliquée. 


MULTIPLAN SUR AMSTRAD 


D CR OL DO On 195F 
Ce livre a été écrit pour vous! Il va vous permettre 
de “piloter” parfaitement ce logiciel et vous donner 
ainsi les moyens de réaliser facilement et en toute 
sécurité des tableaux “sur mesure”. 

Chaque notion vous est présentée sur un exemple 
simple. Vous êtes ensuite guidé pas à pas dans une 
expérimentation qui vous en fait explorer les multi- 
ples facettes. 

La plupart des chapitres sont suivis d'un récapitulatif 
de “ce que vous devez savoir”; vous êtes ainsi en 
mesure de contrôler votre progression. 


PROGRAMMES DE PHYSIQUE SUR 
AMSTRAD 
P. Beaufils, M. Lamarche. Y. Muggianu. 


TR ED D TE 150F 
Les auteurs, professeurs de lycée, ont voulu libérer 
des longs calculs et des formules “bombardées” 
afin de vous permettre une nouvelle approche de la 
physique. 

Vous trouverez dans ce livre 28 programmes corres- 
pondant à l'enseignement de la physique en classes 
de terminale des lycées. Ils traitent de la mécanique, 
de l'électricité, de la thermodynamique, de l'optique 
et de la chimie. 


BON DE COMMANDE 


PROGRAMMES DE MATHÉM£- 


TIQUES SUR AMSTRAD 

P. Beaufils, M. Lamarche, Y. Muggianu. 
192 pages. 

RéLES inc sennuineendenten eee 150F 


Voici des programmes de mathématiques écrits en 
BASIC du niveau d'une classe de terminale de lycée. 
Accompagnés de leurs commentaires, ils transfor- 
ment l'ordinateur en un outil pédagogique de valeur 
et un instrument de calcul puissant pour résoudre 
bien des problèmes. 

En second plan, les auteurs ont voulu montrer que 
les mathématiques ne sont pas mortes avec l'usage 
de l'ordinateur, bien au contraire: l'écriture d'un pro- 
gramme comme la critique des résultats nécessite 
des connaissances solides et variées. 


CALCUL NUMÉRIQUE SUR 
AMSTRAD 


M. Rousselet. 168 pages. 

Réf. E6 150F 
Les règles à calcul, les tables de racines carrées ou 
de logarithmes ont fait leur temps. 

Cet ouvrage met à la portée de tous de nombreux 
outils de calcul. Les principaux domaines du calcul 
numérique sont abordés : résolution des équations et 
des systèmes, intégrations, statistiques et probabili- 
tés, calculs différenciels, etc. 


FAITES VOS JEUX AVEC AMSTRAD 


pleinement les possibilités graphiques et sonores 
des AMSTRAD CPC 464, CPC 664 et CPC 6128. 
Son rôle ne se limite cependant pas à celui d'un 
simple recueil de programmes. Tout d'abord, il vous 
offre la possibilité d'adapter chacun d'entre eux en 
fonction de vos goûts et de vos désirs, et cela sans 
même que vous ayez besoin de connaître le Basic. 
C'est dans ce but que chaque jeu est accompagné de 
nombreuses suggestions de personnalisation qui 
vous sont expliquées dans le moindre détail. 


PREMIERS PROGRAMMES 

Rodnay Zaks. 248 pages. 

Réf. 51 108F 
Comportant de nombreux diagrammes et illustra- 
tions en couleur, ce livre vous enseigne les bases de 
la programmation en BASIC sur Amstrad. Aucune 
expérience préalable de la programmation n'est 
nécessaire. 


AMSTRAD 56 PROGRAMMES 

8.R. Trost. 160 pages 

Réf. 52 78F 
Ce livre vous propose 86 programmes prêts à l'em- 
ploi dans de nombreux domaines d'application per- 
sonnels et professionnels: finances personnelles, 
gestion, immobilier, analyse de données, éducation. 


TECHNIQUES DE PROGRAMMA- 


TION 

ET JEUX EN ASSEMBLEUR 

G. Fagot-Barraly. 176 pages. 

Réf. 53 s8F 

Cet ouvrage contient des programmes de jeux écrits 

pour les ordinateurs Amstrad CPC 464, 664 et 6128. 

Chaque programme est accompagné d'une analyse 
de la structure des phases essentielles 

et de tableaux résumant la fonction et les valeurs 

possibles des principales variables. 


GUIDE DU GRAPHISME 

J. Winford. 208 pages. 

Réf. 54 108F 
Cet ouvrage présente toutes les techniques indis- 
pensables pour vous permettre de réaliser de façon 
simple et rapide des programmes graphiques (ges- 
tion des couleurs, utilisation des différents modes 
vidéo, tracé de courbes, réalisation de graphiques 
animés). 


GRAPHISME EN 3 DIMENSIONS 

T. Lachand-Robert. 240 pages. 

Réf. 55 148F 
Vous pourrez, grâce à ce livre, représenter des 
polyèdres, des surfaces, voire des objets plus com- 
plexes en trois dimensions sur l'écran de votre ordi- 
nateur. Les faire pivoter pour les observer sur tous 
les angles... etc. 


JEUX D'ACTION 


49F 
18 jeux d'action en BASIC pour votre Amstrad: tank, 
trace, D.C.A. blitz, squash, alphabet, numérix, atter- 
rissage, etc. 


PROGRAMMER EN dBASE III 


ET III PLUS 

Par René Cohen. 288 pages. 

Réf. P4 185F 
L'auteur s'adresse aux débutants complets 
qui vont bâtir une application complète de 
gestion de fichiers clients, de stocks ou de 
facturation. Tous les programmes dBASE 
sont largement commentés pour vous per- 
mettre de les modifier ou de les adapter à 


dBASE ET SES FICHIERS - III 


ET III PLUS 
par Jacques Boisgontier. 240 pages. 

Réf. P1 1 
Toutes les commandes et les fonctions de 
dBASE III sont décrites etillustrées dans ce 
livre par un exemple concret. 


L.A. SUR AMSTRAD CPC : 


LANGAGE ET FORMES 

Par Thierry et Eric Lévy-Abégnoli. 
176 Ron 

Réf. 195 F 
Ce livre concerne deux notions bien préci- 
ses de l’Intelligence Artificielle : le langage 
naturel et la reconnaissance de formes. 

Le langage naturel : le programmeur fait en 
sorte que l'ordinateur comprenne notre lan- 
gage, et qu’il parle à son tour en langage 
naturel. 

La reconnaissance de formes : l'ordinateur 
reconnaît une forme par rapport à une autre 
(un carré par rapport à un ballon) et fait des 
comparaisons entre les formes qui lui sont 
présentées. 


GESTION SUR AMSTRAD PCW 
Par Jean-Michel Jego et Alain Gargaden- 
nec. 240 pages. 

Réf. P2 125F 
Ce livre permet de découvrir progressive- 
ment les trois logiciels complémentairesles 
plus utilisés sur Amstrad PCW et CPC 6128: 
LocoScript (traitement de texte), dBASE II 
(base de donnée) et Multiplan (tableur), 
grâce aux modèles et tableaux proposés 
dans ce livre. 


CPC 17 


Veuillez m'envoyer les ouvrages dont j'indique les titres ci-dessous. 


A renvoyez avec votre règlement à STAMP DIFFUSION, 


27, Bd de la Fraternité - 44100 NANTES. 
Frais de port en sus: 28F 
(gratuit pour toute commande supérieure à 300 F) 


Ci-joint mon règlement par chèque ou mandat. 
Nom 


>R — 


Qu'avez-vous commandé au Père-Noël ? Un PC 1512 ? Une imprimante pour sortir 
vos listings ? Un drive parce que vous en avez assez des cassettes ? Un simple logi- 
ciel de jeu, car vous n'êtes pas exigeant ? Quelque soit votre désir, nous souhaitons 
qu'il soit réalisé et que vous continuerez à passer d'agréables moments en compa- 
gnie de votre AMSTRAD... et de CPC ! 


A tous, Joyeux Noël. 


La Rédaction 
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Sémaphor 


TASHORD 61828 MSTERFTILE IIL1 ASrTERcCALE 168 
Le traitement de texte La base données relationelle Le tableur puissant et rapide 
Tous trois utilisent TOUTE la nénoire de votre 6128 et sont aussi utilisables sur les 
dé4 (avec DD1) et 664 aunis de l'extension de nénoire RAN 64Ko ou 256Ko DK'tronies. 
Ces progrannes ont été maintes fois décrits dans ces pages mais nous tenons à votre dis- 
position leurs descriptifs complets. Les revendeurs spécialistes AMSTRAD 5e feront un 
plaisir de vous les présenter. Sémaphore vous propose TASPRINT (c'est lui qui est au 
travail ici), TASCOPY qui effectue vos copies d'écran en 8 tcns de gris ET en deux for- 
nats A4 et A3, AGENDA qui vous permet de tenir à jour un agenda électronique rapide et 
puissant, Î page par jour, tri et recherche, calcule, calendrier perpétuel, horloge .., 
SEMDRAU et DESSIN TECHNIQUE CDRAUGHTSMAN) un ensemble graphique pour les professionnels. 
Nous avons aussi à des prix imbattables, les crayons optiques DART, les extensions de 
nénoire DK'tronics, MULTIFACE TWO l'interface miracle etc... comparez nos prix avant d’ 


acheter, vous ne le regretterez pas! } } } D} >} )})>))})>)»>))>)>)))>)))))) 


Cela fait deux ans que nous attendions l'occasion de placer 
une jolie fille dans notre publicité... 


Cette fois c'est fait et bien à propos ! 


. _ En effet, cette charmante demoiselle à êté “nunérisée" 
a" sur un CPC AMSTRAD et une imprimante DP 2000 ... en 

: "H, moins de dix minutes. Le "SCANNER" mis au point par 
Us V4 DART, créateurs du maintenant célèbre crayon optique, 
RL peut d'ores et déjà être commandé chez Sémaphore qui en 
“2 a assuré la version française. 


Le kit crayon optique + Scanner et logiciels S90.- 
Le Scanner seul avec logiciels . ...... 130. 
"Upgrade" pour possesseurs crayon optique 


DART (sur preuve d'achat) seulement . . . . . 690. 
TRGUOND AMMB LE TARITENENT DE TEXTE POUR LES PEU 
cab & aie DÉGA RDOPTÉ PARA PLUSIEURS 
dy CILLIERS D'UTILISATEURS À ARPIDITÉ, FICHIERS 
°° ne 00.888 ou 188.888 canrciènes, ÜAIL-UERGE 
INCORPORÉ, ACCÈS AUX IUPRIDANTES EXTERNES, 
COUPATIBLE DBASET + PAGPAIQT AUGUENTE LES CAPA- 
CITÉS 0€ L'ADPAIGANTE PEU + DIGCQRTE tour CE QUE vous 

#" RATTENDIEZ POUR TAITURER CES DISQUETTES ET RÉCUPÉRER CES 
FICHIERS PERDUS! LECTEURS EXTERNES 1,9 ET 9,09 + DISQUE ouh, 
N BRICODISC CPC. La disquette explosive de Sémaphore ! Tout ce dont 
vous aurez jamais besoin pour commettre toutes les indiscrétions pos- 
sibles sur Vos disquettes ! Deux faces, 120K de dunamite de science et 
de malice... Formatage de vos 3" à 207% par face, créateur de menus, archivage 

rapide sur K7, transfert de fichier, roniteur de disquette avec affichage & 

édition fichiers ASCII, HEX, Source. Copie disquette et K7 à disquette, éditeur CAT 
avec UNERASE, lecteur d’en-tête, déprotection, compatible 3,5 - 5,05 - 3, tous formats 
Plus de 20 options. RIEN ne vous résistera avec BRICODISC. > > > > > » Seulement 250.- 


Sémaphore - CH 1283 La Plaine (SUISSE) - Règlement par 
Envoyer moi vite votre documentation complète . . . . . . . . 
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INFOGRAMMES 
LANCE KIDKIT 


l'occasion des fêtes de fin d'an- 

née, INFOGRAMMES lance Kid- 

kit à l'attention de tous les 
enfants qui possèdent un micro- 
ordinateur. Véritable sac à malices, il 
contient un classeur, des auto-collants, 
un badge, une carte de membre du club, 
une cassette audio, deux cassettes de 
programmes, un stylo tampon, un 
mémento du Basic, des infos top secret, 
etc. Voilà une idée originale de cadeau 
pour Noël. De quoi faire craquer votre 
ordinateur pour 290 F ! 


NOUVEAUX 
LOGICIELS DE JEU 


es fêtes de fin d'année arrivent à 
grands pas et c'est l'effervescence 
chez les éditeurs de logiciels de jeu. 
Voici les titres qui devraient être dispo- 


dnibles à l'heure où vous lirez ces lignes. 


CHEZ UBI SOFT 


Trivial Pursuit est une adaptation infor- 
matisée du célèbre jeu de société avec 
plus de 3000 questions, où l'ordinateur 
tient le rôle de Maître de Jeu. Des nuits 
blanches en perspective ! Cassette : 
199 F. Disquette : 259 F. 


CHEZ ERE INFORMATIQUE 


1001 BC - participez aux aventures 
d'Ulysse dans son long voyage en Médi- 
terranée. Parviendrez-vous à lui faire 
retrouver le chemin de Ithaque ? Cas- 
sette : 150 F. Disquette : 220 F. 


Scott Winder Reporter. Transformez- 
vous en journaliste et partez en reportage 
à l'autre bout du monde suivant les direc- 
tives de l'ordinateur. Disquette : 220F. 


Egalement annoncés chez ERE INFOR- 
MATIQUE : Harry et Harry, ainsi que 
SRAM II. 


CHEZ ACTIVISION 


Peu de commentaires mais seulement les 
titres : Hijack, Aliens, Basketball, Dandy, 
Hacker Il, Koronis Rift. 


UN JEU POUR 
PC CHEZ LORICIELS 


es jeux de conception française sur 

IBM PC et compatibles sont telle- 

ment rares que toute nouvelle sortie 
mérite d'être saluée. C’est le cas de Lori- 
ciels qui vient de produire TERA, un 
grand jeu de rôle et d'aventure qui se 
déroule sur deux planètes perdues dans 
l'espace et le temps d'un monde paral- 
lèle. Vaste programme ! Pas moins de 
2000 combinaisons d'images en trois 
dimensions vous seront proposées au 
cours de votre aventure où l'ordinateur 
tient lieu de générateur de scénario et de 
Maître de jeu. Il y a même des séquen- 
ces de combat dignes des meilleurs jeux 
d'arcade. Parviendrez-vous aux trésors 
de la fabuleuse Cité des Crânes malgré 


les gardiens qui sont. non, pire encore ! D 


INNELEC S’ADRESSE 
AUSSI AUX PROS 


enis THEBAUD (à droite sur la 

photo) de INNELEC et Laurent 

SCHUHL de SOFTISSIMO vien- 
nent de conclure un accord de distribu- 
tion pour le fameux tableur en français 
VP Planner pour AMSTRAD PC 1512et 
compatibles PC. Identiques à Lotus 
1.2.3, pour ce qui est des écrans, des 
commandes et des fichiers, il offre en 
plus la compatibilité DBase Il et Ill et est 
fourni avec un manuel en français de 
250 pages pour 990 F HT." 


DES EDUCATIFS 
POUR LES PETITS 


ans notre numéro de mars, nous 

vous avions présenté Vivian 

PESCHARDT, maman de deux 
petits jumeaux, qui s'était décidée un 
beau jour à écrire des programmes édu- 
catifs pour les enfants de maternelle. 
Tout est parti d'une idée très simple : 
jusqu'à présent, il était indispensable de 
savoir lire, ne serait-ce que le menu affi- 
ché à l'écran, pour utiliser un programme 
éducatif, ce qui est quand même para- 
doxal quand on s'adresse à des tout 
petits. Madame PESCHARDT se mit 
donc en relation avec les institutrices de 
l'école que fréquentaient ses enfants et 
de cette collaboration devaient naître 


quatre programmes riches en couleurs 
dont nous vous avions parlé lors de leur 
création. 

Malgré de multiples déboires avec les dif- 
férents éditeurs contactés pour la com- 
mercialisation de ces logiciels, l'auteur 
n'a jamais baissé les bras, et c'est le nou- 
veau cru PESCHARDT qui nous est pro- 
posé en cette fin d'année chez EUROGI- 
CIEL, jeune société spécialisée dans le 
domaine éducatif. 

La première disquette ou cassette 
contient deux programmes : Colorimage 
et Les ensembles. Le troisième pro- 
gramme, MEMO, est vendu séparément 
sur cassette ou disquette également. 
Colorimage est composé de tableaux 
représentant plusieurs dessins identi- 
ques, mais de couleurs différentes, tou- 
tes en nuances. A l’aide du joystick, l'en- 
fant devra cliquer le dessin identique à 
celui qui lui est proposé. 

‘Les ensembles'’ présente à l'enfant un 
choix de 6, 12, 18 ou 24 tableauxillus- 
trés de superbes dessins d'objets ou 
d'animaux parmi lesquels l'enfant devra 
reconnaître ceux qui ont une fonction 
commune, par exemple, ceux qui volent, 
ceux qui courent, etc. 

Quant à MEMO , il s'agit d'un programme 
de test de mémorisation avec un choix 
de 3,6, 9,12,15, 18 et 24 tableaux qui 
sortent au hasard, et un temps d'obser- 
vation déterminé par l'utilisateur de 2 à 
20 secondes. Ce jeu couvre une très 
large gamme d'utilisateurs, de la mater- 
nelle jusqu’à l'âge adulte, en fonction des 
paramètres choisis. 

En conclusion, nous disons que, compte 
tenu de la qualité de ces programmes, 
l'utilisation d’un moniteur couleur s'im- 
pose. EUROGICIEL : 16 1 69.01.00.26. 


IMPERIAL SOFTWARE 
ARRIVE EN FRANCE 


a société allemande Imperial Soft- 

ware Systems, très connue outre- 

Rhin pour sa gamme de logiciels 
utilitaires et sa souris Mousepack pour 
CPC et PCW, vient d'installer une filiale 
en France et travaille activement la fran- 
cisation de ses produits parmi lesquels 
nous trouvons le compilateur Basic 
Typhon et l'assembleur Super Pack 80. 
Tél. 87.09.24.14. 


CLUB ACACIA 


IS devaient s'appeler Caca (Club 

Amstrad Côte d'Azur), mais comme 

ça faisait un peu négligé, ils ont pré- 
féré Acacia, comme Amstrad Côte 
d'Azur Club Informatique et Applica- 
tions. Enfin, sachez qu'il s'agit d’un nou- 
veau club qui vient de s'installer à Can- 
nes sous la houlette de Michel EMERIAU 
que vous pouvez contacter au 
93.94.39.12. 


L'ÉVÉNEMENT DE LA RENTRÉE !!! 
LECTEURS 5’’1/4 POUR AMSTRAD 
QUI NE DÉTÉRIORENT PAS L'AMSTRAD 


Livrés avec alimentation dans le même boîtier métallique 


POUR CPC 464-664-6128 PRIX TTC 


DD6 2 fois 172 ko 1 990 F jusqu’au 31/12 


DD7 2 fois 340 ko AVEC UTILITAIRES 
POUR PCW 8256 


DD8-A 706 KO COMPLET PRET A FONCTIONNER _ 


DD8 alimentation sur pcw 
EXTENSION 512 ko 


POUR PC 1512 

DD15-I lecteur de disque supplémentaire 
1 523 F jusqu'au 02/87 

HD20-I disque dur mégas + contrôleur 


Imprimantes pour PC 1512 à partir de 1 690 F TTC 


FAITES VOS COMPTES !!! 


envoyez la commande et le règlement (+ 50 F forfait port) à 


M.V.I. 14, RUE DE ST-QUENTIN 59540 CAUDRY 
Joignez-y cette annonce vous recevrez votre cadeau 
Pour tous renseignements, demandez Marco Vincenzi tél 27.85.50.39 
REVENDEURS BIENVENUS 


IF COMPUTER GAME 
THEN GOTO MEGAM 


ans notre dernier numéro, nous 

vous avions annoncé la création 

de MEGAM au studio 2 de la 
grande halle de La Villette. Le premier 
espace de loisir informatique n'attend 
pas pour créer l'événement : pour les 
fêtes de Noël, MEGAM s'est associé à 
Mastertronic qui mettra sur le marché 
50 000 logiciels à bas prix, accompa- 
gnés d’un coupon de réduction sur le 
droit d'entrée à l’espace loisir. 


NO N JE CONTIENS 


S CONTACT 


MAGAZINE 
DES DEMONSTRATIONS 
ANÏMÉES des MEILLEURS 
JEUX pour AMSTRAD 


MEMO SUR PCW ET PC 1512 


a jeune société dijonnaise DIGITIEL 

vient de créer Mémo qui est un ges- 

tionnaire de fichiers de personnes 
qui permet de traiter les clients, les four- 
nisseurs, les adhérents d’une associa- 
tion, etc. Ecrit en DBase Il, puis compilé, 
il permet l'édition de listes et d’étiquet- 
tes avec de multiples possibilités de 
sélection. Tél. 80.67.24.91. 


19 RUE DE COLMAR BP 937 
27009 EVREUX Cedex. 


TOUS les _ JEUX 
pour AMS TRAD 


DESIGNATION ou 
TITRE du JEU 


Prénom: 
Adresse : 


au MEILLEUR PRIX 


DEMANDEZ LES PRIX 
AVANT DE COMMANDER. 


& 32.28.91.39. 
4 32.28.19. 79.c: AMSTRAD 


Code Postal: _ 
VILLES... 


(ons ue eus eue one ee ee ee ne ee ee md 


ATAHUALPA 
TRANSOFT 
Arcade 


Par un coup de baguette magique, 
vous devenez responsable de la 
destinée d'Iriacynthe ; cette 
charmante créature s'est retrouvée 
dans les ruines d'une cité aztèque, 
après s'être emparé d'un plan 
magique dans un grenier. 

Elle a également subi une petite 
transformation physique : 
dorénavant, elle a des ailes qui lui 
permettent de voler et d'échapper 
aux toupies et aux sphères qui 
veulent l’anéantir. Seulement, ce 
moyen de déplacement s'épuise 
très vite ! 

Dans cet univers où l'on revient 
toujours à son point de départ 
(Atahualpa est sphérique), le seul 
but est de récolter tous les trésors 
qui s'y trouvent sous forme de 
dollar, diamant ou autres. 

Sur un fond de Boléro de Ravel, 
ce jeu propose un agréable 
divertissement. La carte 
d'emplacement des trésors vous 
permettra de les situer rapidement 
et de perdre le minimum d'énergie 
pour leur récolte. 


FREE TEE TEE TE 


e 


FROST BYTE 
MIKROGEN 
Arcade 


Dans les cavernes constamment 
gelées de la planète Cosmia, 
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Hickey a réussi à s'évader de sa 
prison et il cherche maintenant le 
chemin de la liberté. É 
Il doit pour cela traverser de 
nombreuses cavernes, se défendre 
contre tous les monstres qu'il est 
amené à rencontrer ; en cours de 
route, il peut ramasser différents 
objets qui, selon leur couleur, lui 
permettent d'avancer plus vite, de 
sauter plus haut ou de tomber plus 
bas. 

L'originalité de ce jeu réside dans 
le nombre très élevé de cavernes 
et de monstres différents ; il en 
résulte beaucoup de couleurs. 
Enfin, il ne faut pas oublier 
l'apparence physique et le 
déplacement de Hickey : en effet, 
celui-ci est un i sans point et il 
avance uniquement par contorsion, 
ce qui peut créer des difficultés 
dans les affrontements avec les 
monstres car il ne faut pas oublier 
qu'Hickey tire dans la direction de 
sa dernière contorsion ! 


s 


LE CAPITÉ] 
“VOUS VOIR : 


LE ET 

GLOBE TROTTER 
EXCALIBUR 

Aventure 


Si jamais on vous propose un jour 
de faire le tour du monde, je 
suppose que vous êtes tout de 
suite partant. Quel bonheur de 
traverser les mers, d'aller d'un 
continent à l’autre et de découvrir 


les nombreuses civilisations qui 
font que notre monde est tel qu'il 
est !.. Sans oublier la “farniente” ! 
Aussitôt dit, aussitôt fait ! Vous 
embarquez à bord d'un cargo ayant 
comme destination l'Afrique. et 
en avant pour l'Aventure, avec un 
grand À, car vous n'avez pour tout 
bagage qu'un seul et unique dollar. 
D'emblée, vous serez séduit par les 
images bien colorées, avec un 
graphisme qui occupe tout l'écran. 
Je me pose quand même une 
question : parviendrez-vous à 
“boucler la boucle”, puisque vous 
n'avez pas moins de deux 
disquettes à parcourir ? D'autant 
plus que parfois, vous resterez sur 
place, faute de vocabulaire 
approprié ; en effet, il a été 
considéré comme faisant partie de 
l'Aventure de n'avoir aucune 
indication à ce sujet... || ne vous 
reste plus qu'à essayer d'être 
perspicace grâce aux nombreux 
messages sillonnant votre voyage. 


LE PONT. 


LIGHTFORCE 
FTL/UBI SOFT 
Arcade 


Avec ce jeu, vous voilà propulsé 
dans l'univers interstellaire, avec 
tout ce qu'il a d'inconnu et de 
violence. Pour faire face à une 
invasion autour de Régulus, vous 
êtes chargé avec votre avion de 


chasse “LIGHTFORCE"" d'assurer la 
vengeance. 

Ayant quatre parcours à effectuer 
et possédant cinq vies, vous êtes 
sûr de mettre vos nerfs à rude 
épreuve, tout en utilisant avec une 
efficacité maximum votre rapidité 
d'action. Dans chaque parcours, 
l'objectif est de détruire un certain 
nombre de centres de contrôle 
pour récupérer une nouvelle vie, 
mais vous subissez différentes 
attaques acharnées. 

Somme toute, ce jeu ne demande 
que des réflexes, mais vous ne 
regretterez pas la qualité et 
l'originalité du ‘’paysage' qui 
s'offrira à vous... 


LE SECRET 

DU TOMBEAU 
LORICIELS 
Arcade/Aventure 


Dans ce jeu, vous rentrez tout de 
suite dans la peau d'un 
explorateur, puisqu'il vous incombe 
de pénétrer et de découvrir ce que 
contient un tombeau, jusqu'à 
présent inconnu et perdu au milieu 
de la jungle. 

Alors, vous vous retrouvez plongé 
dans un labyrinthe avec un nombre 
élevé de galeries ; attendez-vous à 
faire des rencontres, en général 
désagréables, ou des trouvailles. 
Ces dernières seront aussi bien des 
trésors (attention, il y en a qui 
explosent) que des chambres 
mystérieuses avec des récipients 
pleins d'une eau aux actions 
bénéfiques. Au cœur de cet 
étrange tombeau, vous serez même 
amené à faire de la plongée sous- 
marine, n'ayant pas d'autre issue. 
Dans ce dédale original de galeries, 
vous ne serez jamais à bout de 
découvertes, sachant que la 
fermeture de certaines galeries 
vous permettra de vous engager 
dans des nouvelles. Et si vous 
parvenez à la porte du ‘‘secret”, 
encore faudra-t-il en trouver la 

clé ! 


EXPLORATEUR 3 
ERE INFORMATIQUE 
Utilitaire 


Objets fractals. quel nom. 
mystérieux. Seuls quelques rares 
initiés friands de. mathématiques 
connaissent la question. Pourtant, 
il est très intéressant de se 
pencher sur ce sujet car, au 
moyen de ces calculs, il est . 
possible de construire des surfaces 
qui pourront représenter des ubjets 
ou des surfaces. Quelle que soit 
son échelle, l'objet ou la surface 
apparaissent comme très irrégulier, 
fragmenté. Pourquoi ne pas 
construire le paysage de votre 
prochain jeu d'aventure au moyen 
de ce ‘’kit de construction 
fractale” ? 

Certes, il vous faudra quelques 
bonnes heures avant de tirer des 
résultats cohérents de l'utilisation 
de ce logiciel. En fait, il est très 
technique et la lecture de la notice 
devra être accompagnée 
d'exercices au moyen du logiciel. 
Un programme, appelé Fract Aid, a 
pour but de vous aider à 
comprendre toutes les subtilités de 
ces calculs. L'aspect de relief est 
obtenu au moyen de la semence 
d'un générateur aléatoire qu'il est 
conseillé d'ajuster pour obtenir un 
aspect harmonieux. Seules 
plusieurs tentatives, avec 
modification des différents 
paramètres, vous permettront 


d'apprécier l'incidence de chacun 
d'eux sur les tracés obtenus. 

Les surfaces peuvent être obtenus 
également en ‘point par point” : 
bon courage ! Un curseur est alors 
commandé à partir du clavier. 
Après définition, les surfaces en 
mémoire peuveñt être traitées 
graphiquement. L'exécution photo 
donne l'aspect fini de la surface. 
mais prend bien du temps ! Les 
banques de surfaces sont gérées 


par le programme et peuvent être 
sauvegardées ou rechargées. Si 
vous préférez jouer sur les 
couleurs, c'est la gestion de 
banques d'images qui s'en 
chargera. 

La notice suggère quelques petits 
exemples qui permettront à 
l'utilisateur de se rendre compte 
des possibilités du logiciel. 

A notre avis, Explorateur 3 (un 
produit encore unique dans son 
genre) concernera deux catégories 
d'utilisateurs : ceux qui, curieux de 
nature, veulent s'initier aux 
fractales ; ceux qui connaissent 
déjà le sujet et veulent s'en servir 
pour des applications 
mathématiques, scientifiques. ou 
simplement ludiques. 


THE CODE MACHINE 
DISCOVERY SOFTWARE 
Utilitaire 


The Code Machine est un 
ensemble conçu pour aider le 
programmeur travaillant en langage 
machine ou en assembleur. En fait, 
ce logiciel est en deux parties : un 
moniteur et un éditeur-assembleur. 
Ecrit pour 464, la notice confirme 
qu'il est utilisable sur 664. 

Le moniteur propose toutes les 
fonctions que l'on est en lieu 
d'attendre de ce genre de produit : 
accès aux ROM, dump mémoire, 
désassemblage, conversions, points 
d'arrêt, examen des registres, etc. 
ll serait difficile de tout citer. 
L'éditeur-assembleur possède, lui 
aussi, de bonnes capacités. Il 
supporte toutes les directives 
couramment utilisées, ainsi que 
toutes les facilités d'édition 
souhaitables : numérotation auto, 
renumérotation, etc. Le passage de 
l'éditeur vers le moniteur est 
permis. 

Les deux logiciels peuvent résider 
simultanément en mémoire, 
moyennant quelques précautions. 
La notice, de 68 pages, est 
explicite. Son seul défaut est 
d'être en anglais. Gageons que la 
traduction française ne devrait pas 
tarder à arriver, ce qui faciliterait 
l'implantation du logiciel sur le 
marché français. 


MAILING 
SMART 


Bon ! Il y a du bon et du mauvais 
chez SMART... Nous avons trouvé 
leur tableur agréable ; par contre, 
appeler pompeusement “Mailing”, 
ce qui n'est même pas un mauvais 
traitement de texte, faut pas 
pousser ! 

Pour nous, un mailing doit 
permettre de récupérer, à partir 
d'un fichier d'adresses, par 
exemple, des noms. et des 
adresses, afin de permettre 
l'emploi d'une circulaire. Rien de 


tout cela ! On est loin du compte 
même. Tout comme le semblant de 
notice qui l'accompagne, ce 
“mailing” serait-il une œuvre 
inachevée ? 

Evitez de vous laisser tenter ! 


NUCLEAR DEFENCE 
AMSOFT 
Wargame 


Le monde étant une nouvelle fois 
dans un état de tension proche 
d'un conflit, vous êtes chargé de 
l'éviter, en prenant le 
commandement du dernier-né du 
détachement de défense nucléaire : 
le FALCON. 

Votre ordre de mission se résume 
en trois points : 

1- défendre et protéger vos cités ; 
2- attaquer et détruire les 
vaisseaux ennemis, ce qui Vous 
permettra de faire le plein de fuel 
pour votre bâtiment ; 

3- attaquer et détruire toutes les 
cités ennemies. 

Vous serez passionné par ce jeu où 
tous les écrans (il y en a cinq 
différents) sont d'un graphisme 
remarquable ; de plus, vous devrez 
faire preuve de stratégie et d'une 
grande organisation pour 
coordonner l'attaque d'une cité 
avec le compte-à-rébours qui 
déclenche une contre-offensive 
meurtrière. 

Si vous montez à bord du 
FALCON, vous avez la garantie 
d'un double intérêt : intérêt visuel 
et intérêt du jeu, d'autant plus que 
vous avez le choix de votre grade 
avec pour conséquence le niveau 
de difficulté. 


SUPERSPRITES 
PRIDE UTILITIES 
Utilitaire 


Avec un tel titre, vous l'avez 
deviné, ce logiciel n'est pas un 
traitement de texte ! Vous avez 
des idées originales pour créer un 
jeu, mais l'animation des sprites 
vous pose un problème ? Il est 
pratiquement résolu car 
Supesprites est un utilitaire qui, 
outre ses possibilités d'édition de 
sprites, offre un ensemble de 
routines, accessibles par le Basic 
au moyen de RSX, pour les 
animer. 19 nouvelles commandes 
viennent compléter le Basic de 
l'AMSTRAD, facilitant le test de 
collision, l'affichage d'un score ou 
encore pour obtenir 8 couleurs sur 
l'écran mode 1. 

Chaque commande est illustrée sur 
un court exemple en Basic. De 
plus, la notice (18 pages en 
anglais) explique comment les 
utiliser en langage machine. 

Un programme de démo, dont le 
listing est également reproduit sur 
la notice, montre quelques aperçus 
des possibilités de Supersprites. Ne 
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venez plus vous plaindre qu'il 
n'existe pas d'utilitaire dans ce 
domaine ! 


TABLEUR 
SMART 


Le tableur proposé par SMART est 
d'une utilisation assez aisée. De ce 
fait, il conviendrait facilement à 
des petites applications familiales 
{calculs d'emprunts, simulations 
diverses pour le meilleur choix d'un 
remboursement, crédits, etc.) mais 
trouverait aussi sa place au sein 
d'une petite entreprise. Nous lui 
trouvons un dernier rôle : 
l'initiation à l'utilisation de ce 
genre de logiciels, car sa simplicité 
d'emploi est assez exemplaire. 

La capacité maximale est de 1040 
cases, dans lesquelles on peut 
introduire des labels (textes), des 
données numériques, des formules 
de calculs arithmétiques. Il est 
également possible de réaliser des 
tests logiques, et tout un éventail 
de fonctions mathématiques 
(sommes, moyenne, maximum, etc.) 
est disponible. La duplication de 
cases est aisée. 

Les opérations de calcul peuvent 
porter sur tout ou partie du 
tableau, en fonction de la vitesse 
et des résultats attendus. 

Une représentation graphique, sous 
forme d'histogrammes est 
accessible et permet de 
représenter 3 groupes de 12 
données consécutives. 

Le tableau peut être sauvegardé 
sur disquette puis rechargé 
ensuite. L'édition d'un document 
sur papier, au moyen d'une 
imprimante AMSTRAD ou 
compatible EPSON, permet de 
représenter les labels ou les 
formules, au choix. Là encore, 
l'utilisateur aura le choix 
d'imprimer tout ou partie du 
tableur. Le “formatage” de 
l'imprimante, de l'écran, autorise la 
modification de paramètres tels 
que nombre de colonnes, codes de 
service (imprimante), couleurs de 
fond ou d'encre (écran) ou encore, 
drive en service. 

Dernier raffinement : une 
calculatrice est intégrée au tableur, 
permettant de réaliser les quatre 
opérations de base. 

Simple à utiliser, mais néanmoins 
complet et performant, le tableur 
SMART devrait séduire tous ceux 
qui n'ont pas besoin d'un. 
monstre comme MULTIPLAN. 
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NOUVEAUTÉS SORACOM | 


DÈS LEURS PARUTIONS 


MOULINS MICRO PERON 
90, Rue Regemortes 


03000 MOULINS 
L'OREILLE HARDIE 


entre Cial. Intermarché 


04000 DIGNE 


HI-FI DIFFUSION 
JEAMCO SARL 

19, Rue Tonduti de l'Escarène 
06000 NICE 


GES COTE D'AZUR 

ésidence les Heures Claires 
454, Rue des Vacqueries 
06210 MANDELIEU 


MICROPOLIS 
9, Rue Paillot de Montabert 
10000 TROYES 


GES 
126, Rue de la Timone 
13000 MARSEILLE 


LA és INFORMATIQUE 
42, Rue du Four-Bourg-Neuf 
Vieux Salon 
13300 SALON 
PROVENCE 


M.2.I. 

21, Rue Albert 1°' 
17000 LA ROCHELLE 
GES CENTRE 

25, Rue Colette 
18000 BOURGES 


KEMPER INFORMATIQUE 
72174, Av. de la Libération 
29000 QUIMPER 


SON VIDEO 2000 
MICRO AQUITAINE 
COCAS) 

31, Cours de l’Yser 
33800 BORDEAUX 


INFORMATIQUE 2000 
Place René Dévic Le Triangle 
34000 MONTPELLIER 


RE 
15, Bd. Gambet 
34000 MONTPEÈLIE R 


MICRO-C 
INFORMATIQUE 
3, Bd. Beaumont 
35000 RENNES 


: G.L. INFORMATIQUE 
e la Liberté 


35100 RENNES 


VIDEO SERVICE 
INFORMATIQUE 

9. Place du Président Deety 
37100 TOURS NORD 


LIM 

Centre Commercial CATS 
37170 CHAMBRAY LES 
TOURS 


DEUXIEME LISTE 


MICRONAUTE 

, Rue Urvoy de Saint Bedan 
44000 NANTES 
ORDI-2000 
Thierr COLAS 
127, Av. du Régiment de 
Bigorre 
65000 TARBES 
INFORMATIQUE SERVICE 
68, Rue Maréchal Foch 
66000 PERPIGNAN 
MICRO CENTER 


Centre Commercial Place des 


Halles 
67000 STRASBOURG 


GES LYON 
6, Rue de l'Alma 
69001 LYON 


Four POUR LA 


CRO-GESTION FOCH 
25, Rue de Sèze 
69006 LYON 


MICROPLUS 
ELYSEES 26 


s 
28, Av. Champs Elysées # 
75008 PARIS f 
MICROPLUS 
Sté. KBS ELECTRONICS 
64, Rue de la Chaussé 


d, Antin 


T COMPOSANTS 
ELECTRONIQUE 
2, Rue Emilio-Castélar 


75012 a S 


GENERA 

ÉLECTRONIQUE SERVICES 
68 et 76, Av. Ledru Rollin 
75012 PARIS 


Le ELECTRONIC 

Robert MARTIN 
ï, Rue Victor Hugo, BP 12 
84100 ORANGE 


MAJUSCULE POITOU 
Rue de l’Eperon 


3 bis 
86000 POITIER 


ICV 

130, Route de Corbeil 
Villemoisson/Orge 
91360 EPINAY/ORGE 


LOISITECH 

83, Av. Faidherbe 

93106 MONTREUIL 
ORDIVIDUEL 

20, Rue de Montreuil 
94300 VINCENNES 
LADNER S.A. 

175, Av. du Général Leclerc 
94780 MAISON-ALFORT 


AVENA STE 
uare Colombia, BP 94 
22091 CERGY CÉDEX 


CHOLET COMPOSANTS 
He bb QUE 
90, Rue St. Bonaventure 
49300 CHOLET 
FO PIAIORQ 

Lerthier 

d'A de Laon 
51100 REIMS 
M.I.L. 
27, Rue Ambroise Paré 
53000 LAVAL 


U Port 
6100 LORIENT 
C.S.E. 
Mine LUTZ 
Rue Clovis 


87000 METZ 
MICROTEX 


Taquin 
22, Place de la République 
5917 IX 


ANTENNES PRINGAULT 
39 ter, Route de EL 
59600 MAUBEUGE 


LENS MICRO 
INFORMATIQUE 
96, Av. Alfred Maes 
Route de Lievin 


62300 LENS 
MICROGICIEL 


Bernard Thomas 
2, Place B. Bonhomme 
62500 ST. OMER 


. NORD 
Rue de l’Alouette 
22636 ESTREE CAUCHY 


NEYRIAL 
3, Bd. Desaix 
63000 CLE CLERMONT 


BASE 4 LIBRAIRIE 
Eric GREN 
11, Rue D oHcel 


64000 PAU 


ARPAJOU- 
ORGANISATION 

12, Place de la Cathédrale 
64100 BAYONNE 


GES PYRENEES 


28, Rue de Chassin 
64600 ANGLET 


He PYRENEES 
41, Rue du 4 septembre 
65000 TARBES 


La première liste est passée dans le numéro 16 de CPC. Une liste complète sera publiée dans le numéro 18. 


MEURTRES EN SERIE 


Pull 


| EUX y 


Après “Meurtre à grande vitesse” puis “Meurtres sur l'Atlantique” (Tilt d'Or 1986 du meilleur jeu d'aventure policière), COBRA SOFI 
présente une nouvelle super-production : 


MEURTRES EN SERIE 


1986. À 70 kilomètres des côtes françaises, une petite ile anglo normande est encore un rovaume féodal... avec son Seigneur. ses tradi- 
tions et ses anciennes coutumes ! 


C'est dans ce décor extraordinaire que se situe l'intrigue de “Meurtres en série”, la nouvelle énigme proposée par Bertrand BRO:- 
CARD. 
Dans cette aventure. plusieurs histoires S'entremélent: Légendes celtiques. chasse au trésor. vengeances. fièvre de l'Or. folie... 


Le joueur devra déméler les fils de l'énigme policière, mais sa tâche ne sera terminée que lorsqu'il aura percé le “Secret des Moines” et dé- 
couvert le trésor. 


Le jeu se déroule en temps réel et il vous faudra revivre plus d'une fois cette “journée particulière” ! 


Vivez réellement l'aventure ! 
Non seulement vous trouverez de véritables indices dans la boite (tablette d'argile gravée. bas de femme. parchemin... pour n'en citer que 
quelques-uns) mais Cobra Soft va encore plus loin ! 

En effet. l'un des lieux de “Meurtres en série” existe réellement. Et — en venant à Paris — vous pourrez l'explorer “pour de vrai”!!! 
Et si vous allez jusqu'à l'île. vous pourrez 4 découvrir le “trésor”... 


MEURTRES EN SERIE 

Un logiciel imaginé et réalisé par Bertrand BROCARD. 

Graphismes : Christian DESCOMBES. 

Programmation : Gilies BERTIN. 

Un produit HITECH PRODUCTIONS Ë 

édité par COBRA SOFT — B.P. 155 71104 CHALON S SAONE CEDEX. 


LA GRAND'MESSE 


Denis BONOMO 


n France, ce n’est pas comme en Angleterre, où une manifesta- 

tion entièrement dédiée à l’Amstrad a lieu tous les trimestres, 

aussi l'Expo qui vient d’avoir lieu cse 21, 22, 23 et 24 novem- 
bre a-t-elle attiré des milliers de visiteur... 


Bien la Grande Halle de la Villette, bâti- 
ment vétuste s'il en est, transformée par 
les architectes, contemporains pour abri- 
ter toutes sortes de manifestations ! Les 
exposants étaient nombreux et les 
stands, riches de nouveautés en tous 
genres. || y avait beaucoup de vedettes ; 
celles du logiciel, celles du matériel et. 
d'autres en chair et en os ! 

Que recherchait le visiteur, parfois venu 
de loin (Lyon, Marseille, Bordeaux, Lille, 
Rennes, Strasbourg...) ? Déjà, il voulait 
voir, toucher, essayer le célèbre PC 1512 
dont tout le monde parle mais qu'il est 
si difficile d'acheter ! Hélas, ce ne sera 
pas encore pour demain ! Les anglais for- 
ment des listes d'attente que les français 
viennent grossir. Sans vouloir alimenter 
la polémique sur ce sujet, il faut néan- 
moins signaler que, si la machine se fait 
attendre, les conditions posées aux 
futurs revendeurs sont, elles, clairement 
exposées. Espace ‘‘professionnel'” indis- 
pensable dans le magasin, présentation 
obligatoire de logiciels tels que GEM, 
séparation au sein du magasin des 
machines familiales où les ‘’kids'" se 
défoulent sur des jeux dont les ponctua- 
tions sonores risquent de déranger... 
Deux personnes au moins, par point de 
vente, doivent avoir suivi un stage de for- 
mation chez AMSTRAD : c'est une 
bonne garantie pour les futurs clients 
mais les petits magasins pourront-ils 
absorber cette charge supplémentaire, 
surtout quand on sait que les marges 
offertes sur ce matériel sont plus que 
réduites. Interrogés sur ce sujet, les plus 
petits sont unanimes : comment voulez- 
vous qu'on vende une machine à voca- 
tion professionnelle avec des marges 
‘’familiales’" ? On peut effectivement se 
poser la question ! 

Pour en revenir à l'expo, le PC 1512 était 
là, bien présent sur presque tous les 


stands. Les développeurs commencent. 


enfin à pouvoir disposer d'une machine. 
C'est heureux car la compatibilité n'est 
pas totale, d'après ce qui nous a été dit, 
et il faut tenir compte de certaines parti- 
cularités liées à la machine, mais celles- 
ci se révèle rapidement comme étant un 
bon outil de travail. Déjà, on songe à 
améliorer ses possibilités. Une carte gra- 
phique haute résolution couleur (un peu 
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dans le style EGA...) est en cours de miee 
au point ! Digital Research présentait 
toute la famille des GEM disponibles 
bientôt chez MICROPOOL. Quel plaisir 
d'utiliser la machine avec de tels 
logiciels ! 

Côté matériels, on pouvait découvrir pas 
mal de nouveautés. Sur le stand DEIA, 
diffusé par SERIP, était présenté sur 
onduleur qui sera proposé à un prix voi- 
sin de 2000 F. Finie la hantise des pan- 
nes de courant. Pour les budgets plus 
modestes, on pouvait voir chez LOISI- 
TECH, un boîtier de sauvegarde 
mémoire : une coupure de courant sur- 
vient et la batterie prend instantanément 
le relais, maintenant intact le contenu de 
la mémoire. Bien sûr, le moniteur n'est 
plus alimenté. 

Nos amis suisses de SEMAPHORE Logi- 
ciels présentaient un scanner, capable 
d'analyser une image photographique 
introduite dans votre imprimante et de la 
mettre en mémoire. Côté digitalisation 
d'image, on pouvait voir 2 appareils : le 
premier chez ROMBO, constructeur bri- 
tannique. Le second chez JAGOT et 
LEON, une réalisation bien française. On 
introduit un signal vidéo, issu d’une 
caméra, d'un magnétoscope ou d'un 
téléviseur et celle-ci se trouve digitalisée. 
On peut la traiter, la stocker sur disquette 
etc. 

Après le plaisir des yeux, celui de l'oreille. 
TMPI présentait sa gamme de synthéti- 
seurs musicaux et vocaux. De quoi ravir 
les mélomanes et ceux qui veulent enfin 
donner la parole à leur ordinateur : ‘’Au- 
clair-de-la-lune-mon-ami Pierrot’. 
MMC présentait sa Graphiscop ll, la 
fameuse table à dessiner de conception 
française. Design entièrement reconsi- 
déré, couleur bleue. Nous espérons pou- 
voir vous en proposer un banc d'essai 
dans notre prochain numéro. 

En continuant la promenade, on pouvait 
voir également un tuner TV, exposé sur 
le stand ORDIVIDUEL, transformant le 
moniteur couleur de l'AMSTRAD en télé- 
viseur : un bon moyen pour vous récon- 
cilier avec le reste de la famille. Citons 
encore KENTEL avec son interface/logi- 
ciel de communication Minitel à 350 F. 
Un astucieux dispositif antistatique qui 
évitera à la poussiére de s’accumuler sur 


vos écrans, et aux programmes de se 
planter si votre moquette est génératrice 
d'électricité statique, nous a été confié 
par ARTS et BUREAUX SERVICES. On 
pourrait aussi vous parler du nouveau 
SINCLAIR, mais cela intéressera-t-il le 
lecteur de CPC, déjà possesseur d'un 
AMSTRAD ? 


Côté logiciels, nous avons débusqué tou- 
tes les nouveautés que le Père Noel 
pourra vous offrir. Chez LORICIELS, Bob 
Winner, jeu d’'arcade-aventure superbe, 
ressemblant à un dessin animé. Chez 
INFOGRAMES, l'ordinateur flirte avec la 
BD. Grâce à un accord passé avec l'au- 
teur des Passagers du Vent, vous pour- 
rez vous transporter avec la belle Isa, au 
XVIIIe siècle, graphismes superbes 
garantis ! Outre les nouveautés miton- 

nées par UBI SOFT, 


et déjà annoncées 

dans CPC, un contrat de distribution 
exclusif, passé avec British Telecom 
(Firebird, Odin, Beyond, Rainbird) va per- 
mettre de mettre au moins 4 logiciels 
chaque. mois, sur le marché. Prix bas 
garantis ! Chez UBI Soft, on flirte aussi 
avec la B.D et le célèbre Gaston Lagaffe 
va bientôt sévir sur vos écrans. FIL pro- 
pose, pour les fêtes, un coffret à 145 F 
contenant 3 jeux : Gunfright, The Way 
of the tiger, V ! les visiteurs. Et Cobra ! 
Si vous saviez ce que le serpent a 
mijoté ! HMS Cobra nous transporte en 
pleine seconde guerre mondiale : un jeu 
super-intéressant. Meurtres en série vous 
transforme en enquêteur et vous fera 
découvrir l'île de Sark. Une nouvelle 
gamme d'utilitaires, dont un génial Music 
Studio, sur lesquels nous reviendrons 
prochainement, est proposée aux créa-. 
teurs. HATIER présentait une gamme de 
logiciels scolaires et éducatifs. Un bras- 
robot était présenté sur le stand et mani- 
pulait entre ses doigts d'acier de délicats 
petits œufs en polystyréne. MICRO- 
APPLICATIONS présentaient ‘’la solu- 
tion’”, un intégré réunissant les possibi- 
lités offertes par Datamet, Textomat et 
Calcumat. Le PCW n'était pas oublié : 
POLYSOFT offrait Polyprint, un utilitaire 
permettant d'imprimer 


les documents « sh 
= ‘vw, 
7 K 
4 Oo à 
, \ 
, À 
Ü Ê 
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avec plusieurs polices de caractères et 
MICRO-C présentait l'adaptation du célè- 
bre Cherry-Paint. 

S'il est hélas impossible de citer tout le 
monde, il convient de parler de l'am- 
biance fort plaisante de cette manifes- 
taion. Des idées originales un peu par- 
tout : STARTER, le roi incontesté de la 
duplication, avait réussi un coup de maï- 
tre avec deux charmantes jeunes filles si 
identiques sous tous les points de leur 
beauté que l'heureux Lam Nguyen avait 
du mal à s’y retrouver. LORICIELS avait 
érigé un château-fort que bien des 
enfants rêvaient de prendre d'assaut. 
Chez INFOGRAMES, on se sentait dans 
un autre monde : deux ravissantes 
demoiselles en compagnie de beaux 
messieurs, illustraient grandeur nature, 
les Passagers du Vent. Chez COBRA 
Soft, c'est l'amiral Morla, programmeur 
de HMS Cobra qui en imposait aux petits 
mousses venus voir ses démos. Les plus 
fûütés ont profité de leur visite sur le stand 
pour examiner la cabane, pleine d'indi- 
ces de Meurtres en série : ça pourra leur 
servir ! Mais la véritable vedette de l'ex- 
position était peut-être la petite puce 
jaune que l’on voyait un peu partout, sur 
les épaules des gens ou les claviers d'or- 
dinateurs. C'est du stand HATIER que 
partaient ces charmantes bestioles qui 
ont fait sourire petits. et grands. 

Une grande fête, bien réussie. À quand 
la prochaine édition ? 


AT | 


DR | 


EE ——, y 


HTTP 


Un faux compatible est un poison! 
voici l'antidote : 


Ton abondance, 

Ton TURBO, 

Ton DOS +, ton GEM, 
Ton TURBO-PASCAL, 
Ton PRIX 


.… JE CRAQUE! 


TRAN - 53, impasse Blériot, 83130 LA GARDE 
Tél. 94.21.19.68 


NOUVEAUTÉ 


DES COMPATIBLES PC A MOINS 
DE 4.000F "T C’EST UNE REALITE 


avec la nouvelle gamme d'ordinateurs complets 


JASMIN TURBO HQ de T.R.A.N. 


Jasmin Turbo 
en grande surface 


J'ai été agréablement surpris de trou- 
ver des « JASMIN TURBO » dans une 
grande surface. Avec son look « AT » et 
sa clé « anti-reset », il fait vraiment pro- 
fessionnel. Mais que fait-il dans un hyper- 
marché, ce compatible IBM PC/XT ? 
Quand j'ai vu le prix, j'ai compris ! | com- 
mence à 3.954,47 F Hors Taxes pour 
256 K de mémoire vive (RAM). Mais c'est 
le prix d'un bon micro-ordinateur fami- 
lial ! C'est difficile de résister et, bien sûr, 
je me suis même laissé tenter par un 
modèle supérieur à deux lecteurs de dis- 
quettes et 640 K RAM à 6.224,29 F HT. 
Surtout, je connais bien la société fran- 
çaise T.R.A.N. à travers sa famille de lec- 
teurs JASMIN, bien appréciés des ORI- 
CIENS et des AMSTRADIENS. 


De bonnes surprises 


6.224 F, c'est déjà un très bon prix pour 
un compatible PC classique de même 
capacité, mais quand j'enlève l'embal- 
lage, quelle découverte ! Le langage 
structuré le plus vendu au monde, le 
TURBO PASCAL de Borland avec son 
manuel, les systèmes d'exploitation DOS 
PLUS et GEM de DR. avec le guide 
et les licences officielles. L'ensemble de 
ces logiciels coûte à lui seul plus de 
2.000 F. Encore une autre découverte : 
une sounis de haute précision dont le prix 
est d'au moins 1.000 F. Surtout, l'unité 
centrale contient déjà : 

— la carte-mère équipée de 640 K de 
RAM, du microprocesseur 8088-2, d'un 
emplacement prévu pour le rajout du co- 
processeur arithmétique 8087 et de 8 
ports d'extension à connecteurs longs ; 
— la carte 16 couleurs et graphique 
appelée aussi la carte CGA avec une sor- 
tie vidéo composite couleur, une sortie 
vidéo N. et B., une sortie RVBI, une inter- 
face crayon optique ; 

— la carte « MULTI 1/O » comprend deux 
ports série dont un équipé, une interface 
imprimante parallèle Centronic, une en- 
trée manette de jeu, une horloge/calen- 
drier permanent sauvegardée par bat- 
terie, le contrôleur pour deux lecteurs de 
disquette. 


Etil reste encore 6 ports d'extension dis- 
ponibles. Sa généreuse alimentation à 
découpage de 150 W ventilée réside 
dans l'unité centrale et non dans le moni- 
teur, ce qui pérmet une évolution sans 
soucis de la configuration du système, 
par exemple changer de moniteur sui- 
vant ses besoins. 


La double vitesse, clé 
de la vraie compatibilité 


On connaît bien les problèmes que 
posent les ordinateurs qui ne fonction- 
nent qu'en 8 MHZ avec des logiciels 
écrits pour du 4,77 MHZ, vitesse de l'IBM 
PC. Or, JASMIN PC est un TURBO à 
double vitesse 8MHZ et 4,77 MHZ com- 
mutable au clavier. C'est indispensable 
pour une vraie compatibilité. 

Mis en garde ces derniers temps de la 
mauvaise compatibilité de certains clô- 
nes, j'ai tout de suite testé avec « Com- 
patest » et MS-DOS. Le résultat m'a plus 


que rassuré : 98 % en compaïbilté pon- 
dérée et 3° niveau de compatibilité. Et, 
jusqu'à ce jour, je n'ai pas encore trouvé 
de logiciel pour IBM PC qui ne fonctionne 
pas sur le JASMIN TURBO. 


Systèmes d’exploitation 


J'ai apprécié le choix du système 
d'exploitation DOS PLUS de Digital 
Research Inc., pour sa double compa- 
tibilité avec le système MS.DOS 2-11 et 
CP/M 86. Vive les transferts de fichiers 
entre les deux standards. 

Le système d'exploitation d'environ- 
nement graphique G.E.M. (Graphic 
Environment Manager) de DRI est livré 
avec, ce qui permet à JASMIN TURBO 
d'utiliser toute application écrite sous 
GEM, disponible sur le marché. Par 
exemple, le GEM-DESKTOP (pour 
BUREAU) permet d'utiliser le JASMIN 
TURBO avec des Icônes comme un 
Macintosh. 

La convivialité avant tout. 


Gamme JASMIN TURBO HQ : 


HQ pour Haute Qualité. Chaque modèle est équipé d'office d'une carte TURBO, des 
cartes « CGA » et « Multi l/O », du clavier AZERTY de bonne qualité avec indicateurs 
lumineux et d'un lecteur de disquettes 51/4. Chacun est accompagné de DOS-PLUS, 


GEM et TURBO/PASCAL. 
HQ CLUB : 


256 K RAM extensible à 640 K - 


alimentation allégée - DOS PLUS - 


TURBO PASCAL - 1 lecteur 5'1/4 


640 K RAM - Souris - DOS PLUS - 
GEM - TURBO PASCAL - 
Alimentation 150 W - 2 lecteurs 5''1/4 


640 K RAM - Souris - DOS PLUS - 


HQ 2 


HQ 10 


3.954,47 F HT 


6.224,29 F HT 


GEM - TURBO PASCAL - Alimentation 150 W - 


1 lecteur 51/4 - 1 disque DUR 10 MB 
640 K RAM - Souris - DOS PLUS - 


HQ 20 


8.001,69 F HT 


GEM - TURBO PASCAL - Alimentation 150 W - 


1 lecteur 5°1/4 - 1 disque DUR 20 MB 


9.915,69 F HT 


Le moniteur monochrome 12" haute résolution est proposé à 758,85 F HT. Le moni- 
teur couleur 14" haute définition : 3.279,93 F HT. 


Où trouver les JASMIN TURBO ? 


Chez VCB2-GARONOR Tél. 48.67.66.01, D.F.I. PARIS Tél. 42.88.14.97, MICRO-CLUB 
BOBIGNY Tél. 48.31.69.33, VISMO PARIS (11°) Tél. 43.38.60.00, MAXITRONIC MAR - 
SEILLE Tél. 91.34.49.79, TRILOGIC MARSEILLE Tél. 91.08.05.49, SOMECII MAR- 
TIGUES Tél. 42.81.07.38, JCR LYON Tél. 78.61.16.39, MICRO DIFFUSION TOULOUSE 
Tél. 61.22.81.17, dans les points de vente JASMIN et aussi directement chez T.R.A.N., 
53, impasse Blériot, 83130 LA GARDE - Tél. 94.21.19.68. 


IBM PC/XT sont des Marques Déposées de International Business Machine Corporation DOS PLUS - GEM sont des Marques Déposées de DIGITAL RESEARCH INCORPORATION 
AMSTRAD-PC est une Marque Déposée d'AMSTRAD. TURBO-PASCAL est une Marque Déposée de BORLAND INTERNATIONAL. JASMIN-TURBO est une Marque Déposée de TR AN 
La Société T R A N se réserve le droit de modifier toute spécification sans préavis 


elle révolution sidérale d'une pla- 
le temps qu'elle met à faire un tour 
plet de son orbite autour du Soleil. 
e tableau ci-dessous résume la compo- 
sition de notre système solaire par ordre 
d'éloignement du Soleil. 


1) Planètes inférieures ou intérieures 
(orbite entre Terre et Soleil) 

Mercure : révolution sidérale 88 jours 
Vénus : révolution sidérale 225 jours 
Terre : révolution sidérale 365 jours 
2) Planètes supérieures ou extérieures 
(orbite plus grande que celle de la Terre). 


Mars : 1 an 322 jours 
Jupiter : 11 ans 315 jours 
Saturne : 29 ans 167 jours 
Uranus : 84 ans 7 jours 
Neptune : 164 ans 280 jours 
Pluton : 284 ans 157 jours 


Voici un rappel de mécanique céleste 
important à connaître pour bien com- 
prendre le résultat graphique du pro- 
gramme. 

— Toutes les planètes évoluent dans le 
même sens (sens direct) ; 

— quand une planète semble faire du 
‘’sur-place'’, on dit qu'elle est en sta- 
tion ; 

— quand une planète semble inverser sa 
course, on dit que son mouvement est 
rétrograde. 

Ces définitions et leurs explications sont 
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Saturne 


parfaitement décrites dans n'importe . 
quel livre d'astronomie pour amateur. 
Mais revenons à notre programme. ll 
comporte de nombreux points communs 
avec le programme de localisation paru 
dans le numéro 13. Le listing que nous 
vous présentons ici est en fait un com- 
plément de celui-ci. 


UTILISATION DU LISTING 


Sur une disquette ayant au moins 45 K 
de disponible : 

— sauvegarder ‘Localisation des planè- 
tes’’ (attention, les numéros de ligne 


_ devront être conformes à ceux du listing 


paru dans CPC n° 13, pages 17 et 19), 
donc SAVE ‘’TRAJPLAN''. 

— Saisir le listing ci-joint (ne pas le lan- 
cer par un RUN, ce listing n'a pas de sens 
pour l'instant). 

— Sauvegarder celui-ci pour corrections 
éventuelles. SAVE ‘’AJOUTER"". 

— Une autre sauvegarde mais en ASCII 
par SAVE ‘’AJOUTER'",A 

— Recharger TRAJPLAN par LOAD 
‘’TRAJPLAN”. 

— Le lister et supprimer les lignes sui- 
vantes : 

100, 110, 340, 650, 840, 900, 910, 
920, 950, 960, 990 à 1060, 1340 à 
1750, 1860, 1880, 1990, 2010, 2120, 
2140, 2260, 2280, 2390, 2410, 2420, 
2540, 2560, 2670, 2690, 2770, 2790, 
2810 à 2870, 3380 à 3500. Supprimer 


FA 
QD | 
Neptune - 


\ 


TRAJECTOIRE PLANETES 


J. VANDENBERGHE 


ètes’’ nous permettait de connaître la position des planètes 

du système solaire avec, pour chacune d'elles, leurs coordon- 

nées en ascension droite et déclinaison. 
Aujourd’hui, nous allons suivre leur évolution dans la bande zodia- 
cale durant leur révolution sidérale. 


D: le numéro 13 de CPC, le programme ‘’Localisation des pla- 


REM (') de la ligne 1100. 

— Fusion de TRAJPLAN et AJOUTER 
par MERGE ‘’AJOUTER". 

Et voilà le programme ‘‘Trajectoire des 
planètes’. Ne pas oublier de le sauvegar- 
der. 


EXPLICATIONS SUR LE 
DEROULEMENT DU PROGRAMME 


Après avoir effectué RUN, on vous 
demande l'année pour laquelle vous vou- 
lez observer l'évolution d'une planète 
(exemple : 1986), puis l'intervalle (en 
jours) entre deux positions de la planète. 
REMARQUE : 

Les planètes intérieures évoluent vite ; 
leur orbite est bouclée en moins d'une 
année terrestre alors que les planètes 
extérieures évoluent plus lentement à 
nos yeux de terriens. Nous aurons donc 
pour les planètes rapides à donner un 
intervalle compris entre 5 et 30 jours, 
alors que pour Uranus 200 jours rendront 
le graphique plus lisible. Vos essais vous 
aideront dans le choix des intervalles. 
Les coordonnées, pour chaque position 
tracée, sont affichées en haut à droite de 
l'écran. 

Ce programme peut être enrichi en qua- 
lité, en graphisme et, pourquoi pas, 
représenter notre système solaire en trois 
dimensions... Je souhaite lire des criti- 
ques constructives dans les futurs numé- 
ros de CPC... 


. 


u0G GRAP 
s giBl\ 
REFERENC ” Carat. É DC arbonr 


L ee! 1 ASTON 
La Pratt ._ aillard 


Millet ” 


30 ‘ TRAJECTOIRE GRAPHIQUE DES FLANETES 
351 sy$(1)=CHR#(252)+" Mercure“:ey$(i)zCc 

HRS$ (225)+" Venus" 

FES sy$(4)=CHR#$(254)+" Jupiter 'sey$ (Sec 

HAS (25514+" Saturne" 

IE sy$(6)=CHR#(251)+" Uranus":sy$ (7: =CH 

R&(C25014+" Neptune" 

354 sy$(8)=CHR#(253)+" Fluton'isyé (5) =CH 

R$&(234)+" Mars" 

ETS rs$(li="88 Jours ER ="225 jours" 
srsb(s)="1 an 222 jours 

356 rs$i4)="1i ans 315 jours'irs#(s)="5zs 
ans 167 jours" 

337 rs$i6i="94 ans 7 jours 

ans 280 jours" 

338 rs$(8)="2684 ans 157 jours: 

340 MODE Z:G0T0 2880 

650 LOCATE 49,Z2:FRINT CHK$(176)shis"h";m 
mn ssds"s os 

900 FLOT bx,by:LOCATE 70,7:FRINT tt; 

905 IF ttrs THEN 912 

Qi RETURN 

912 LOCATE 18,28:INPUT "Desirez-vous une 
Copie sur NP AeDRe “02e TEE: 

914 IF r$="0" OR r$="o" THEN 3500 

918 LOCATE B, 25:FRINT" Tapez totem, MP TL 
r un autre calcul. £ F i--: Four retour 
au menu. " 

918 FH=INEEYS: IF r$="" THEN 918 

20 ré=UPFFERS(r#)sIF r$="C" THEN 94û ELS 

E CLS:END ‘else run'"menu" 

984 j=21 

986 m=i 

1102 LOCATE 10,15:FRINT"'QUELLE FLANETE V 

OULEZ-VOUS SUIVRE DANS SA TRAJECTOIRE ?" 
1104 LOCATE 4,17:FRINT'"1:Mercure 2:Venus 
SsMars 4ïJjupiter S:Saturne é*Uranus 73:N 
eptune 8:Fluton" 

1106 LOCATE 39,189: INPUT ! ",pl 


Msrs$(7)="164 


1198 IF pizo OR pil:8 THEN 1iûe 
1199 tteû 
LOGE TSI 
1794 re=88 
1880 GOSUE 2825 


THEN 1990 


1912 2030 
1514 

2010 GOSUB 2825 

2042 IF pis: THEN 2170 


Zù rs=és? 
2140 GOSUE 2825 
218% IF pli:4 THEN 2300 
2187 rs=4iis 
2280 GOSUR 2825 
2812 IF pi<r9 THEN 2450 
E14 rssiu/si 
“410 GÜSUB 2825 
246 [F pliré THEN 2580 
44 resitéébi 
25480 GÜSUE 2828 
GEM EVE EREZATREN-27F0 
2554 res=598éû 
2690 GOSUEB 2825 
2 IF pli£:8 THEN E86û 
4 rs=90S ét 
790 GOSUB 2825 
2610 t=ttsi:ttett+ss 
2820 GOTD i£io 
2825 LOCATE 70,2:FRINT CHRE (17813 INT (gi 


2870 RETURN 
380 FRINT STRINGS(79,"- 
590 PRINT'TRAJECTOIRE DE "ssy#ipli+t a 
partir du 1/1"5:aa 
400 PRINT STRINGS(79," 
3410 LOCATE 7,17:PRINT'Revolution sidera 
le de "ss3y#(pli:LOCATE 14,19:PRINT sreg( 
pur 
3415 LOCATE 5,5:FRINT CHR#&(159::LOCATE S 
21: PRINT CHR& (154) 
420 LÜCATE 5,24: FRINT'EEL TAU GE 
CAN LI0 VIE BAL SCO SAG (Es 
ÀF VER TA EE 
3425 LOCATE 45,5:FRINT"'Ecart entre deux 
points'"s;ss: "jours." 
3420 LOCATE 45,7:PRINT"'Nombre de jours € 
coulies--;:" 
34355 DEG:ORIGIN 20,200 
3440 ORIGIN 20,%42,5 
3450 FOR n4=0 TO 360 STEF Z:y=SIN(n4)s Pl 
OT nÂxl.ééééé, 117#y:NEXT 
3480 ORIGIN 20,157,5 
3470 FÜR n4=0 TO 360 STEP Z:y=SINin#) ill 
OT nÂ+1.66666,117#y:NEXT 
3480 RAD: ORIGIN 0,6 
3490 GOTO 1220 
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LSAT Software 


55, rue du Tondu 33000 BORDEAUX Tél. 56.96.35.23 


3"1/2-5"1/4 
tière de sauvegarde font d'HERCULE, 


SANS CONCURRENT, UN MUST 100 % FRANÇAIS 


PRIX : 250 F. (disque uniquement) 


RÉALISÉ ET ÉDITÉ PAR ESAT SOFTWARE 


MULTIFACE II 


UNE INTERFACE POUR SAUVEGARDER 
TOUS VOS PROGRAMMES 
PLUS PERFORMANTE QUE SES CONCURRENTES 


CARACTÉRISTIQUES: COMPATIBLE TOUS 464-664-6128 ENTIÈREMENT EN FRANÇAIS 


Connection sur la sortie drive 

— Presser sur un bouton pour interrompre tout 
programme en mémoire 

— Sauvegardes sur tout support (cassette/cassette 

cassette/disquette . disquette/disquette - dis- 

quette/cassette) 

Sauvegardes sur 3°, 31/2, 51/4 

Contrôle par menu 

Sauvegarde les écrans de vos jeux 

Possibilité d'imprimer les écrans Détecte les erreurs d'utilisation 

Rechargez les écrans sans l'interface Les fichiers ne sont pas protégés, vous pouvez 

— Compatible avec d'autres extensions les désassembler 

— Sauvegardes sous forme de 5 fichiers Informe sur tous les états du Z.80 

— Stoppez tous vos programmes — Possibilité d'utiliser les 64K supplémentaire du 6128 


SAUVEGARDEZ, EXAMINEZ, MODIFIEZ TOUS VOS PROGRAMMES: 600 FRANCS 


CSL Sofiuare 


55. rue Tondu 33000 Bordeaux Tél 56 96 35 23 Poste 31 


Visualisez le contenu de la mémoire 

Visualisez le contenu des registres 

Dump ASCII et héxadécimal ou décimal 
Insérez des points d'interruptions 

Modifiez les couleurs 

Sautez aux adresses de la ROM et de la RAM 
8K RAM et 8K ROM incorporés 

Différentes vitesses de sauvegardes 
Modification possible de chaque octet 


RAP el 1e 1] 


PAIE 


1°" SPECIALISTE AMSTRAD 
DU SUD-EST 


CBI Informatique - 6 rue Mazarine - 13100 AIX-EN-PROVENCE 
CBI Informatique - 74 rue Edmond Rostand - 13000 MARSEILLE 


TURBOCOPY Ill 


Sauvegardez vos disquettes 


Enfin le véritable copieur physique sur Amstrad 


+ Copie intégrale de toutes vos disquettes protégées où non. 

+ Permet une analyse complète de chaque piste — compatible 464, 664 et 6128. 
+ Analyse ultra performante de chaque piste : 

— secteurs de taille différentes, abîmés 

— pistes non formatées, non standard 

— affichage des numéros de secteur, type. 

— lecteur secteur ‘’éffacé”, mal écrit. 

+ Recopie jusqu'à 42 pistes. 


DISQUETTES 3" 
A 29 F TTC L'UNITE 


Disponibles jusqu'à épuisement du stock 


dans les deux magasins et aussi 
par correspondance, 
uniquement par 
boîtes de 10, 


ATTENTION : TURBO COPY Ill copie 99% des logiciels du marché il ne devra être utilisé que pour une seule copie de sau- 
vegarde. Nous dégageons toute responsabilité quant à l’utilisation abusive de ce logiciel. 
TURBO COPY III 375 F. 


PROMO OKIMATE 20 : 2290 F TTC 


UNIQUE : 3 SYSTEMES 
D'IMPRESSION 

COULEUR 

avec ruban couleur sur papier normal 

NOIR 

avec ruban noir sur papier normal 

SANS RUBAN 

en noir sur papier thermique (49 F le rouleau 
de 30 m) 

L'ensemble de ces procédés bien utilisés 
en font une des imprimantes les plus intéres 
santes et les plus économiques pour une utilisa 
tion personnelle. 


FRACTIONS 5e, 4 et 3° 


Très bon outil pédagogique réalisé avec le concours 


BELOTE SUR AMSTRAD 


[] OKIMATE 20 2290F TTC 
(LIVRE AVEC 1 RUBAN + LOGI- 
CIEL DE HARD COPY) 

CO CABLE IMPRIMANTE 130 F 
TTC 

CO RUBAN NOIR 99 F TTC 

C] RUBAN COULEUR 99 F TTC 
[] SUPPORT ROULEAU THER- 
MIQUE 110 F TTC 

C] PAPIER THERMIQUE PAR 
ROULEAU DE 30 M 69 F TTC 

[] PAPIER NORMAL PAR 
RAMETTE DE 500 FEUILLES. 
110 F TTC 

[] SUPER PAINT SUR DIS- 
QUETTE 395 F TTC 

[SOURIS AMX 690 F TTC 


NOUVEAU 


Stages formation 
AMSTRAD et PC 


Pour vousinitier, vous perfectionner ou simplement pour 
vous distraire, installez-vous dans votre fauteuil et 
préparez-vous à affronter vos adversaires à la mémoire 
infaillible. 

Si au cours de vos longues parties la soif vous gagne ils 
ne trinqueront pas avec vous car eux ne consomment 
que des ‘’Bits’’ et resteront lucides et rapides. 

Votre partenaire, sobre, vigilant, et infatiguable vous 
aidera à mettre vos adversaires ‘’dedans”. 

Cassette 145F Disquette  190F. 


d'enseignants. Entraînement au calcul sur les fractions, 
simplifier, réduire au même dénominateur, additionner, 
multiplier, diviser et calculs plus complexes. Chaque 
réponse fausse est analysée et une aide est fournie. 
Après 10 exercices une note et une appréciation sont 
fournies ce qui permet à chacun de situer son niveau. 
Exercices illimités avec 3 niveaux de difficulté : cela per- 
met à l'utilisateur de débuter avec les fractions puis 
d'acquérir une maîtrise complète du calcul. 

Cassette [! 145F Disquette [1 190 F. 


à AIX 
et MARSEILLE 


Locoscript, Multiplan, 
D Base Il, Framework, 
Lotus, Word, etc. 
Renseignements au 
Service formation : 


NEO MEDIA 


42.27.00.40 


VOICI MON BON DE COMMANDE 


Cocher tous les articles qui vous intéressent ou faites une feuille à part 
Faites le total + frais de port (30 F pour un achat inférieur à 500 F — 40 F pour moins de 1 000 F — 
Gratuit à partir de 1 000 F) 


Nom Prénom Tél. 


Adresse 

Ville 

Mon CPC est un : 

©] 464 Monochrome 

[] 464 Couleur 

C] 664 Monochrome 
664 Couleur 

[1 6128 Monochrome 

[] 6128 Couleur 


Code Postal 
Envoyez le tout à : 


Service expédition 
CBI Informatique 
Chemin de la Viane 
Les Tousques 

84360 MERINDOL 


Mode de paiement 
[1 Chèque (ci-joint) 


[1 Contre-remboursement 


Marcel LEJEUNE 


ENCORE DES DISQUES DURS 

La suciete Tandon Computer prepare un 
iisque dur de 21 megaoctets et une 
carte de controleur qui pourraient etre 
installés dans les PC 1512 du bas de 
gamme pour Un prix voisin de 5OO0 | 
De son côte. Pluss Distribution annonce 
la disponibilité immédiate de la Plus card 
qui Comprend sur une Carte enfichable un 
disque dur de 20 où 30 mégaoctets et 
lelectronique de commande. Ca vous 
coutera 400 Livres pour 20 Mo et 500 
Livres pour 30 Mo. Tél. 19 44.73 
4/9.49.63. 


NOUVEAUX LOGICIELS POUR LE PC 
1512 

Ashon Tate fournira en Europe des ver 

sions spécialisées de D Base Il et Frame- 
work qui seront disponibles en anglais, 
français, allemand et néerlandais. Tima- 
tic Systems a créé pour les PC une ver- 
sion amelioree de son logiciel de DAO,. 
Microdraft. Tél. 19 44.32 923.67.27. 
49 Livres, c'est ce que coûte Vu writer 
de Vuman. un traitement de textes très 
réputé qui dispose des caractères accen 

tuées des principales langues européen 

nes. Tél. 19 44.61 226.83.11. La célè 

bre tablette graphique Grafpad 3 de Graf 

sales et le logiciel de dessin associé 
seront bientôt disponibles pour PC. Tél. 
19.44 92.34.39.42. Duncan Data Bases 
propose son gestionnaire de bases de 
données PC promise pour 70 Livres. Tél. 
19.44 19.42.25.38. 


DIGITALISEUR D'IMAGES 

Après The Electric Studio et Rombo Pro 
ductions, c'est John Morrison qui pro 
pose un boitier digitaliseur d'images 
video et un logiciel pour la gamme des 
CPC. Les prix sont à la baisse, 60 Livres 
seulement c'est donné ! Tél. 19 44.53 
253./5.07. 


NOUVEAUX LOGICIELS DE DESSIN 
Metrotech annonce la commercialisation 
de deux nouveaux logiciels de dessin. 
EASIART est un programme de dessin 
artistique géré par un menu à icônes. On 
y trouve les traditionnelles fonctions Fill, 
couper-coller, cercle, zoom, aérographe, 
etc. EASIDRAW s'adresse plutôt au des 
sinateur industriel et permet de réaliser 
par exemple des schémas de circuits 
electroniques. Chacun de ces produits 
est vendu 16.95 Livres. Metrotech 
lechouse. 20 Vine Place. Sunderland 
SR1 3NA 
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PREMIER PROGRAMME CENSURE 


L'éditeur CRL a eu la désagréable sur 
prise de voir son programme de jeu Dra 
cula censuré par le très officiel British 
Board of Film Classification. Basé sur le 
hvre de Bram Stoker, te programme est 
un jeu d'aventure graphique, mais para 
doxalement ce ne sont pas les dessins 
qui ont été censurés, mais les textes qui 
ont meme choqué l'auteur du pro 
gramme (sic), lui meme père de famille. 
Il a déclaré que le programme ne 
conviendrait pas aux jeunes enfants. Une 
mise en garde figurera donc sur les 
emballages de cassettes. Parallèlement, 
CRL annonce la sortie d'un autre jeu 
d'aventure intitulé Murder off Miami où 
vous Jouez le role d'un détective chargé 
d'enquêter sur ce qui pourrait être un sui 
cide. La suite de l'aventure s'appellera 
The Malinsay Massacre et sera disponi- 
ble en 87. 


MIRRORSOFT PERSISTE... 

Si vous êtes un habitué de cette rubri 
que, vous savez surement que nous 
attendons toujours avec autant d'impa 
uence les deux logiciels d'édition électro 
nique annoncés depuis de longs mois 
pour les CPC, je veux parler de Pagema 
ker de Amx et Fleet Street de Mirrorsoft. 
Lorsque nous avons rencontré les pro 


grammeurs de cette société pour la der 
ture fois. ils étaient à la recherche des 
nevitables derniers bugs dans le pro 
gramme. Malgré cela. la société annonce 
deux nouvelles versions de ce meme 
locqoel. une pour PCW et l'autre pour 

ompatibles IBM PC avec drivers pour 
imprimantes à laser. Esperons que nous 
Li AUTONS pas à attendre aussi longtemps 


ETLE PC 1512, C'EST POUR QUAND ? 
n'y a pds qu'en France que les ache 
teurs potentiels de PC 1512 se deman 
dent quandils pourront prendre posses 
Sion de leur machine. Chez nos amis 
anglais. les rumeurs les plus pessimustes 
citculent. au sujet de la fiabilité des PC 
1512 et surtout de leur date de livraison 
effective. à tel point que Alan Sugar a été 
obhge de piquer sa colère pour tenter 
d apaiser les esprits. Il semble également 
qu'il y ait des problèmes avec les cartes 
controleurs de disques durs et c'est 
l'usine Western Digital installée en 
Irlande qui prendrait la relève du fournis 
seur initialement prévu. 


AMSTRAD COMPUTER SHOW 

La XIe édition du désormais célèbre 
AMSTRAD Computer Show se tiendra 
les 9, 10 et 11 janvier 1987 dans les 
salons de l'hôtel Novotel de Hammmer- 
smith. Qu'on se le dise ! 


RESULTATS DU SONDAGE 


Tout d'abord, merci à ceux qui répondi 
rent à ce sondage, prenant ainsi quelques 
minutes de leur temps. 

Un sondage n'est pas réalisé pour se 
faire plaisir, mais pour voir quelles amé 
lorations apporter à notre produit. 

Or certains résultats sont surprenants. 
41 ‘ de nos lecteurs se situent dans 
une tranche d'âge comprise entre 30 et 
50 ans et 38 % entre 16 et 30 ans. 
58 ‘, et c'est important, n'ont aucun 
hen professionnel avec l'informatique. 
alors que seulement 11 % de ‘’pros'' se 
trouvent sur le créneau AMSTRAD. 
30 ‘ sont des étudiants. 

Vous passez de longs moments avec 
votre ami AMSTRAD, puisque 35 
passent de 25 à 50 heures, 33 % de 10 
à 25 heures et 17 % plus de 50 heures 
par mois, ce qui est important. 

53 ‘ ont acheté leur appareil depuis 
moins de deux ans. Nous trouvons alors 
un résultat qui devrait faire plaisir à de 
nombreux revendeurs. 88 % ont acheté 
leur ordinateur chez un revendeur. Une 
grande partie des produits annexes est 
achetée par correspondance. Cette 
démarche semblerait montrer que les 
revendeurs fixent difficilement leurs 
clients. 

53.4 ‘ utilisent un 464, 14 % un 664 
et 34 °o un 6128. Par contre, le chiffre 
du PCW est assez faible, environ 8 °o 
Pour ce qui concerne le changement vers 
le compatible PC 1512. la surprise est 
desagreable. puisque seulement 14 a 
souhaitent acquernr Ce maternel. alors que 
1.9 6 pensent au PCW Ceperidtant. il 


faut minorer ce résultat. 40 ‘ n'ont pas 
donné de réponse. Nous pouvons pen 
ser que ces lecteurs n'ont pas encore 
d'opinion sur le sujet. 
Notre lectorat est fidèle puisque 82 % 
sont des lecteurs permanents. 
Nouveau point particulièrement impor 
tant. 83 ‘ de nos revues sont lues par 
plus d'un lecteur, ce qui est bon comme 
taux de lecture. 
La distribution semble vous satisfaire 
puisque 54 % trouveni facilement la 
revue dans les kiosques. Li fort pourcen 
tage restant est du, bien sûr, aux abon 
nés. 
39 ‘ mettent en premier les utilitaires 
puis les bancs d'essais et les articles 
d'initiation. 
En second, nous trouvons, à égalité, l'in 
formation. les programmes courts. Les 
programmes longs arrivent en 7° post 
ton. 
Ce sont les jeux qui arrivent loin derrière, 
avec les montages électroniques. 
Si ce sondage est parfois surprenant, il 
correspond à peu près à ce que nous 
pensions. 
Reste le problème des délais de livraison, 
parfois longs pour les abonnés. Il s'agit 
la d'un problème de routage. Notre 
société respectant la loi, et ne voulant 
pas se mettre en infraction avec les 
conséquences que cela peut avoir, uti 
lise le routage T3 légal. Aucune revue 
dediée à AMSTRAD ne peut utiliser le 
toutage 206 (plus rapide). Nous avons 
sur te sujet engagé un combat, car ilne 
Letné pas seulement AMSTRAD. 


[IT 


ATION 


e mois dernier nous avons vu les principes de l’utilisation de 
l’assembleur ASM, du chargeur LOAD (ou HEXCOM) et du 
debugger DDT. Nous allons maintenant illustrer cette utilisa- 
tion par un programme exemple, dont le seul propos est justement 
de nous fournir un exemple de la facon dont se déroule le cycle de 
développement en assembleur, saisie du source, assemblage, cor- 
rections éventuelles suivies d’un nouvel assemblage, chargement 


et tests. 


Nous voulons donc écrire quelque chose 
de très simple, qui est l'affichage à 
l'écran de tout le jeu des caractères 
visualisables, et de répéter cela cinq fois. 
Le listing du programme ESSAI.ASM 
vous est donné page suivante tel qu'il 
apparaît sur l'écran ou l'imprimante lors 
de l'assemblage. 


Dans les colonnes de gauche de ce lis- 
ting apparaissent des valeurs en hexadé- 
cimal suivies d'un signe = qui indiquent 
les valeurs des constantes. 

Puis vient la partie code généré qui est 
constituée de deux parties : 

— L'adresse où sera chargé le code, qui 
correspond à la valeur du compteur ordi- 
nal. Comme vous pouvez le constater 
nous avons, par la directive ORG, indi- 
qué que le programme commence en 
100H, ce qui est le point d'entrée obli- 
gatoire de tout programme CP/M. 

— Le code généré par lui-même, c'est- 
à-dire ce que vous pourrez voir à 
l'adresse indiquée par une commande D 
de DDT. 

Le texte à saisir avec ED ou tout autre 
éditeur est donc bien sûr uniquement ce 
qui suit ces colonnes générées par ASM, 
la colonne 1 de votre source correspond 
aux caractères ; des premières lignes. 

Une fois donc votre texte saisi dans un 
fichier que nous appelerons ESSAI.ASM, 
vous pouvez l’assembler et en obtenir la 
liste à l'écran par : 

A>ASM ESSAI.AAX 

Source ESSAI.ASM sur A :, ESSAI.HEX 
sur A: et liste à l'écran (X). 

Si vous avez fait des erreurs, ASM affi- 
chera une lettre code erreur au début de 
la ligne en erreur. La signification des 
codes erreur importe peu car ASM n'est 
pas le champion de la détection de l'er- 
reur exacte ! Ce qu'il est important de 
noter c’est que si une lettre apparaît, il 
y a presque à coup sûr une erreur. Mais 
attention il y a pire, quelquefois il y a une 
erreur et ASM ne le signale pas ! Il est 


donc important de vérifier que du généré 
apparaît bien avant une ligne qui doit nor- 
malement en générer. Si ce code est 
absent, c'est qu'il y a une erreur. 

Si vous désirez obtenir une trace sur 
papier vous devez procéder de la façon 
suivante : 

A >ASM ESSAI.AAA 


DDT 
NEXT PC 
Vie0 0106 
OF F5 
GE @: 
9E Qi 
46 @1 
05 Qu 
C9 00 
50 4% 
ua on 
Q@ ES 
: DS GA 
QQ GE 
ZA 67 
8102 LXI D,@15C 
@1U7z MVI C,09 
0105 CALL Q@05 
2105 MVI A,0F 
Q10A PUSH PSW 
QiQE MVI A,2z1 
Q@100 STA GisA 
G11Q MVI AG,4E 
D11Z STA O15E 
@i15 1_DA 1584 
Q115 MOV E.f 
+ 
COZOMOENDIA A=N0 H=VQUQ D=-AAUÛ H=-UQnA 
+ 
COZOMOEUIU A=QÙ E=VDQ0 D=QD15C H=UDUQ 
—t 
COZUMAEUTA A=Q0Q H=000I D=UISC H=GO0UU 
—9, 195 
Essai sur CPCRIZE 
+D1UAES 
2 
COZIMBEQIR A=0Q H=QQ7Z D=FEiE H=UUUU 
— 
CATIMAEUIM A=nû H=UO07EZ D=FEIE H=0208 


Génère fichier listing ESSAI.PRN sur A: 
A >PIP LST:=ESSAI.PRNIT8] 

Envoi à l'imprimante du fichier liste avec 
prise en compte des tabulations toutes 
les 8 colonnes. 

L'option T8 est obligatoire car ASM 
insère des caractères de tabulation (9) 
qui ne sont pas pris en compte par PIP 


ua 
9E 
ui 
ÿE 
UD 


ua 
C @i 
ÛF 
Q5 
QE 


P=GiBGA Lxi 


D, 1500107 


P=G1Qz MVIi D, A9+Qi Us 


S=<diat P=G:0S CHLL QaAS+UDAS 


Ssbiüu P=ûibs 


S=sbine P=<BiAW LXxI 
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et/ou l'imprimante. Cette option provo- 


que la conversion des tabulations en ESSAI.ASM 
espaces. ; 
Si vous désirez obtenir d'office cette 3 Programmez affichant le jeu des caracteres Visualisables. 


conversion ainsi que la numérotation des 
lignes il suffit de faire : 
: A>PIP PRN:=ESSAI.PRN 


L'imprimante logique PRN : corrrespond 2005 = FER. ESE 8 Re Us a A S 
à LST : avec les options T8N. a80a = REBOOT ECU a ; Re-initialise CP/M 
Une fois le programme assemblé correc- Que: = CONOUT EGU z t Fonction CP/M Console Out 
tement, il faut convertir le fichier .HEX à affiche un caractere 
en fichier COM par LOAD (ou 20003 = PRINTS EQU s #{ Print Strins affiche 
 HEXCOM) 5 une chaine termine par $ 
A >LOAD ESSAI 2000 = FAUX eau o 
Lit. ESSAI.HEX et génère ESSAI.COM FFFF = VRAI æaqu NOT FAUX 
A ERA ESSAI.HEX | _ ès pre fticher 
Suppression de ESSAI.HEX devenu inu- | 220F = SES CNP RS PA PE re Le 
tile. . | FFFF = CPCE1ZE eau VRAI 
Vous pouvez alors tester directement le 
résultat. 0100 ORG 10H 
A > ESSAI , 5 Affiche un message de debut 
Si cela ne marche pas, vous pouvez être 
amené à essayer de récupérer la main par 0108 115C@1 1xi d'Messase : DE contient adresse de la 
CTRL-SHIFT-ESC pour rebooter CP/M. æ ÿ Ehaine à visualiser 
Dans le pire des cas, il faut couper l'ali- REC RE D NP NERMeN FERRER 
: ; s [se] e] a 
mentation de l'unité centrale. 
Il faut alors essayer de voir ce qui ne va 3 Initialise lé compteur de lignes 
pas en testant le programme avec DDT. : | . 
Tout d'abord, il faut charger DDT et le 0108 :Z:EQF min mvi arLignes 5 Nombre de lignes à afficher 
ebut! 
programme à tester. Q1QA F5 push PsWw i Sauvegardes dans la Pile 
A >DDT ESSAI.COM 
Vous pouvez voir, à la page précédente, 3 Initialise la valeur a afficher 
l'illustration de l'essai que nous allons 
faire QiGR ZE: mvi ar "+1 5 Valeur du premier caractere 
' . : 5 apres Un espace 
Comme vous pouvez le voir, DDT affi- Q1@D =:SAGI sta CarVal 3 stockee dans la valeur du 


che deux valeurs en hexa, NEXT corres- 
pond à l'adresse de la fin du programme 
chargé et PC à l'adresse du compteur E Suite | on 
ordinal. Remarquez que, bien que notre 0110 ZE4E mvi a 7E 3 Initialise colonne 


caractere affiche 


QDiiz ZI2SERQ1 sta Cotanre 
programme se termine en 0173, comme | 
il est indiqué sur notre listing d'assem- 5 Boucle d'affichage 
blage, le chargement s'opère par blocs Be Affiche: | ; TA: en tee 
complets de 128 octets, ce qui explique a115S o SAG1 da Ce: Val ? Car actere a aff i cher dans ÂALcUy 
; À Q11E SF mav Es à 3 Puis dans registre € 
le 0180 affiché par DDT. 0113 Q@EQ: mv i c, CONOUT : Fonction console out 
Tout d'abord, si nous tapons la com- D11B CDOS500 call EDOS visualisation 


recupere caractere 


mande D, DDT liste le vidage mémoires ida CarVarl 5 

de 12 lignes de 16 octets à partir de 2e ÉEVE : Rire Rs 
l'adresse courante. ÿ2z | AutreLigne : si arrive a GFFH 

En examinant ce vidage, nous y retrou- Ida Colonne 3 Mise à jour colonne 
vons notre programme, vous pouvez der "a 

comparer le code généré indiqué dans le Es Colonne 

Re s nez Affiche 3 caractere suivant 

listing d assemblage et le contenu de la CD4aBQi call CrLf ÿ Ligne suivante sur ecran 
mémoire aux adresses correspondantes. Fi pop CET i mise à jour nombre de lignes 
D'ailleurs, un élément saute aux yeux ; 2e der a 

c est notre petit message, qui, nous pou- CAAEO! ee Ein 5 Fin du programme 

Le vérifier, se trouve bien à l'adresse Cz1001 ie Guéte ef et AN SO CINUE 

Tapons maintenant la commande L. DDT " Autrelisne: 

nous désassemble les 11 premières ins- Er is AU UE ee sd n _ 
tructions de notre programme. Bien sûr 142 <D PES FRE PET MA CAO 
DDT ne connaît pas les noms que nous Q143 Cr0A01 jnz Debut 

avons donnés aux constantes où aux 

variables, et ce qu'il affiche, ce sont les Fin du prosramme 

adresses correspondantes telles qu'on Fini 

les trouve dans le code généré. Q14E QEUQ mv i c, REEOOT 

Exécutons maintenant quelques instruc- a148 CDOS00 call EDOS 

tions en mode pas à pas. Pour cela, il suf- Fe Ar ti 

fit de taper la commande t (Trace). 5 Qus programme de Line Feed Carriase return 
Comme vous le voyez DDT affiche la 014B 1E0A Crlft mvi 2, BAH 

valeur des drapeaux, puis tous les regis- Qi4aD VER: mvi z CONOUT 

tres, le désassemblage de l'instruction Es Cha call SRE 

exécutée et, après l'étoile, l'adresse de di dens el NICE 

l'instruction suivante. Q1SE CDO500 call EDDS 

Si nous tapons à nouveau t deux fois, la 0153 C3 rat 


dernière ligne nous indique que l'adresse 
de l'instruction suivante est en 0005, 
c'est-à-dire en dehors de notre pro- 
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5 Definition des zones de travail 


ua CarVat db la) 
ea Colonne db a 
BAD Message db 


@AH, QDH ; 


5 Valeur du caractere affiche 
5 Colonnes visualisees 
Un line feed et un 


IF CPCEI1ZE 


45777:61E9 db 
ENDIF 


Essai sur CPCEIZS" 


IF NOT CPCE1ZS 
db Essai sur CPC4B4 ou CPCEF4" 


ENDIF 
PABABD db 
4 db Ne 


END 


AAH, GAH, ADH 


5 Marque de fin de chaine 


gramme, et au point d'entrée du BDOS 
de CP/M. 

Vous pouvez ainsi vous amuser à exé- 
cuter CP/M pas à pas, mais attention, du 
fait de l'interaction entre DDT et le 
système à un moment où à un autre, 
vous risquez de perdre la main et de pro- 
voquer un plantage ! 

Il est donc habituel de laisser s'exécuter 
les fonctions de CP/M en mode normal. 
Comment faire ? et bien tout simplement 
par une commande G (Go) qui provoque 
l'exécution de cette fonction nous spé- 
cifiant un point d'arrêt qui, bien sûr, se 
trouve dans notre programme. 


Ainsi G, 108 exécute la fonction CP/M 
et nous reprenons la main à l'instruction 
qui suit cet appel. Ce point d'arrêt nous 
est indiqué par *0108. 

Comme vous pouvez le constater, notre 
fonction s'est bien exécutée et notre 
petit message ‘Essai sur CPC6128' s'est 
bien affiché. 

La commande X, qui affiche une ligne 
presque identique à une trace, nous per- 
met de voir que nous sommes bien arré- 
tés en 0108 et de connaître la prochaine 
instruction à exécuter. Remarquez au 
passage que les registres ont été utilisés 
par CP/M et que nos valeurs ont été 


Larriage return 


détruites. Ainsi DE, qui contenait 
l'adresse 015C de notre message, a 
maintenant une valeur de FE16 ! 

Pour recommencer depuis le début, il 
nous faut repositionner le compteur ordi- 
nal en 0100. C'est ce que nous faisons 
par XP, qui nous affiche la valeur actuelle 
du PC (0108) et nous pouvons la modi- 
fier en tapant 100. Une commande X 
nous permet de vérifier que nous som- 
mes bien revenus en 0100. Mais ätten- 
tion, nos registres et drapeaux n'ont pas 
été ré-initialisés. Par la modification du 
PC, vous pouvez aller n'importe où dans 
votre programme, mais si certains regis- 
tres doivent contenir des valeurs préci- 
ses pour une bonne exécution, il est 
nécessaire de les initialiser avant. 


Nous terminons notre essai par une 
commande G, sans point d'arrêt, ce qui 
provoque l'exécution de notre pro- 
gramme et le retour à CP/M puisque 
celui-ci exécute une fonction ‘REBOOT' 
de ré-initialisation. 


Mais vous pouvez spécifier un point d’ar- 
rêt avant ce retour à CP/M pour analy- 
ser, par exemple, le contenu des zones 
utilisées, après exécution. 


Le mois prochain nous continuerons par 
l'étude des macro-assembleurs MAC et 
RMAC. Bon debugging ! 


SACS 


REVENDEUR QUALIFIÉ 


Propose une gamme complète et diversifiée 


d'ordinateurs AMSTRAD 


étudiée pour s’adapter à vos besoins. 


FAMILIAL 


CPC 464 
CPC 6128 


Elysées 26 

26, Champs-Elysées 
75018 PARIS 

45 62 18 56 

*Ouvert le dimanche 


228, rue du Fg Saint-Antoine 75012 Paris - Tél.: (1) 43.711212 
Minitel. (1) 43,56 75 87 (mot de passe ACSi 


DISTRIBUTEUR 


TRAITEMENT 
DE TEXTE 


PCW 8256 
PCW 8512 


PROFESSIONNEL 


PC 1512 : SD-DD 
HD 10 millions 
HD 20 millions 


et assure la maintenance 


la formation 


la distribution et le développement des logiciels 


la vente des fournitures. 


228, rue du fg St-Antoine 

75012 PARIS 

43 71 12 12 

*Ouvert du lundi au vendredi 


Mini-informatique DPS 6 
Micro-informatique MICRAL 


Bull | 


AGRÉÉ 


ET ÉcPPie 


64, rue de la Chaussée d’Antin 
75009 PARIS 
48 74 06 78 


*Ouvert du lundi au samedi 


Ordinateurs personnels PC 
Réseaux 
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hélicoptère (joystick et fire ou curseur et 
copy) sur le pays demandé. Le second, 
plus difficile, vous proposera les capita- 
les et ne pourra se dérouler que lorsque 
le premier sera terminé. Une note est 
attribuée pour chaque exercice. (Poser 
l'hélicoptère près des carrés). 
4) L'encyclopédie : Que vous feuillete- 
rez vous fournira pour chaque pays un 
tableau renfermant ses principales carac- 
téristiques. Le contour du pays vous est 
a éidans une fenêtre et vous pouvez 


Philippe DEMOULE 


a géographie de l’Europe au bout des doigts, c'est 
que vous propose ce logiciel éducatif entièrement gr@ 

phique et animé, basé sur la mémoire visuelle, et des= ; 
tiné th aux adultes qu'aux enfants. Il y aura de la compéti- pays. 
tion dans les chaumières. Copiez et sauvegardez à la suite le listing 


1 sous le nom EUROPA et le listing 2 
Sur un rythme de rock endiablé, le menu 2) Le puzzle : Pour constituer la carte en sous le nom EUROPA1. Outre l'écran de 


istogramme, les surface, popu- 
et densité démographique des 26 


vous propose ses options : la redessinant. En cas d'abandon, un présentation, le listing 1 vous demandera 
1) Visualisation des pays : Pour appren- écran vous présente la liste des pays d'indiquer le choix monochrome ou co: 
dre à situer tour à tour chaque pays en oubliés. Puis une note vous est attribuée. leur, objet d’une double programm 

le faisant clignoter sur une splendide 3) Le voyage : Vous propose deux exer- Faites un reset complet avant 


carte de l'Europe. cices. Le premier consiste à poser un utilisation. 


Or LISRINGRSS SSSR 280 FOR tp=i Me 

—— 290 ORIGIN 0,0: 

20 40:DRAW 370,190:D 

20 : ù 

AQ choix du monite )72},412:PRI 
SEA SP ARR res a 


60 MODE Z: BORDER 3 

70 INE O,1:INK 1,16 

80 WINDOW#1 , 24, 52,5, 20: PAPER#1 , 1: PEN#1, 0 
:CLS#1 

90 LOCATE#1I,8,4:FRINT#1,"UTILISEZ-VOUS : 
4. SALOPES ISPING le SEneeE 
190 LOCATE#1,6,8:FRINT#i,"Le Monochrome | 

RDA 


110 LOCATE#I,6,10:PRINT#I, "La Couleur 


sus à EE mm mm LISTING E--——-——-- 
120 LOCATE#1,9,14: INFUT#i,"Votre choix " LE 


smonit 

150 IF monit::1i AND monit<}2 THEN 120 
140 POKE 42000, mon i t 
TE GENERIQUE ----- 
160 MODE 2% 
170 IF FEEKH(42000)=1 THEN BORDER 12: 1INF. 
OG,26:INF 1,0:FAFER O:FEN 1 

186 IF FEEK(42000)=2 THEN BORDER 23: INE 
SL'INE 1,16:FAFER O:PEN 1 

190 ORIGIN 220,200: r=600 

200 MOVE G,r 

210 FOR n=0 TO 360 STEF 10 

220 DRAW rxSIN(n),r*xC0Si(n) 

230 NEXT 

2406 FOR tp=1i TO ZOOO:NEXT tp 

250 b$=CHR$(164)+" FHILIFPE DEMOULE":c$= 
“FROFOSE":g$="UN LOGICIEL EDUCATIF'":d#=" 
EUROFA":+#f$=" version 1.86" 

260 LOCATE ((89-LEN(b#))/2)+1,5:FRINT b$ 
270 LOCATE ((80-LEN(c#))/2),7:PRINT cé 


[a] 


160 DEFINT a-z 

170 FRINT CHR$ (23) ; CHRS (0) 
180 ON EREAE STOF 

190 GOSUB 4290 

206 ZONE 13 


26 


210 DIM p$(26) 

220 DIM p(26):FOR n=i TO Zé6:p{(n)=OG:NEXT 
n 

230 RESTORE 2040:FOR n=i TO 26:READ a$:p 
$(n)=a$:NEXT n 

240 ‘ 


250 IF PEEK(42000)=1 THEN BORDER 
2: INK 


1,26: INK 0,5:PAPER O:PENr 1 
EEK(42000)=2 THEN BORDER 3:MODE 
INK Care RAO: PEN 1 


+3 


1INE 1, 
PYONÉLS 
280 w=û 
290 FLOT 6,294, i:DR 
:DRAW 6,6: DRAW € 4 
300 PLOT 2,39 8,441 RAW 638,398: DRAW 638,2 
AW 2,2: DRAK 2,398 
O0 LOCATE ((80-BEN("EUROPA"))7/2),4:PRIN 
"EUROPA" 
320 LOCATE 16,11:PRINT"'VISUALISATION DES 
Fe d'S nes min es craintes ml0inie CT 
330 LOCATE 16,13:PRINT"LE FUZZLE (recons 
de la carte) 
à LOCATE 16,15:FRINT"'LE VOYAGE (questi 
aire su" les pays)... 
à LOCATE 16,17:PRINT"L ENCYCLOPEDIE (b 
de donnees) .,........s..... 4" 
9 LOCATE 30,Z4:FRINT "VOTRE CHOIX 7" 
270 GOSUE 4790 
280 IF a$="1" 
290 IF a$="2" 
400 IF a$="3" THEN 2060 
410 IF a$="4" THEN 3010 


WP634,394:DRAW 634, 6 


sous. 2" 


THEN 2500 
THEN 420 


Zeleree 
420 ON BREÂAF GOSUB 3850 
440 IF Fe 42903)=1 THE 

2:INK 0,2 


460 CLS 
470 sc=0 


O:DRAW 430,270 


TFLOT 490,240: DRAW 556,240: DRAW 556, 1 
RAW 490,160:DRAW 490, 240 


5340 WINDOW#7,17,31,3,3 

530 WINDOW#S,10,40,3,23:PAPERKZ, 1: FEN#TZ, 
(e 

360 WINDOW#6, 60, 70,20,24:FAFER#6, 1 : FENK6 
, D: CLS#6: FRINT#6:FRINT#6,"  Abandon“:PRI 


D: MODE 


NTH#6: FRINT#6," "3 CHR$ (154) +CHR$ (243) +"CE 
NTERI]" 

370 FLOT 10,10:DRAW 630, 10: DRAW 620,390: 
DRAW 10,390:DRAW 10,10 

380 PLOT 5,5:DRAW 6235,5:DRAW 635,395: DRA 
W 5,395: DRAW 5,5 

390 PLOT 400,10:DRAW 400,390 

600 PLOT 395,10:DRAW 395,390 

610 CLS#3 

620 PRINT#3:PRINT#3," 
er le nom“ 

620 FRINT#3," des 26 pays d'europe. Gi v 


Vous devez cit 


ous" 

640 FRINT#3," vous trompez ou encore fai 
tes" 

650 FRINT#3," une faute d'orthographe, a 
ucun"“ 


, 660 FRINT#£:," point ne vous est decompte 
È et" 

j FRINT#Z," l'erreur vous sera signale 
Le score vous indique au 
et a mesure le nombre de p 
NT#3," que vous avez trouves.ll v 


faut taper chaque lettre a 


720 PRINT#Z," le cas echeant les espace 


750 FRINT#3," mais sans trait d'union. E 


740 FRINT#:," cas de besoin la touche ve 
STE 
750 FRINT#:3," 
e," 
x 760 FRINT#E," 
D, FRINT#2Z," 
e* 

80 PRINT#3," bleue..." 
790 PRINT#3:PRINT#S, “ 
uche..." 

800 CALL £&BBOG:FAFER#3Z, 0: PEN#KS, 1: CLS#3 
810 FRINT#S:FRINT#S, “ CITEZ LES 26":PRI 
NT#5," FAYS D'EUROPE": INPUT#1,p$:G0T0 88 
(a) 

820 CLS#7:FRINT#2,SC 


CDEL] vous servira de gomm 
Validez enfin votre repons 


en appuyant sur la touch 


Enfoncez une to 


830 IF sc=5 THEN u=i:G60SUB 2290:u=0 
84% IF sc=10 THEN uz=i:GOSUE 2500:uz0 
850 IF sc=15 THEN u=1:GO0OSUB 2310:u=0 


860 LOCATE 1,1 
870 IF sc=26 THEN 1870 ELSE INFUT#1i,p$ 
880 IF UPFERS$(p#)="" THEN GOTO 1930 ELSE 
RESTORE 1160:1F UPFFERS$(p$)="FRANCE" THE 
N F(1)=F(1)+1:1F F(1):1 THEN GOSUB 1860 


:GOTO 820: ELSE GOTO 1790 
c0e, 


690 RESTORE 1210:1F UPFERS (p$)="ESFAGNE" 
THEN p(2)=p(2)+1:1F p(2)€>1 THEN GOSUB 
1860:G0T0 820 ELSE GOTO 1790 

900 RESTORE 1240:1F UPPERS (p$)="RFA" THE 

N p{3)=p(3)+1:1F p(3)<>1 THEN GOSUB 1860 
:G0TO 820 ELSE GOTO 1790 

910 RESTORE 1290:1F UPPER$ (p$)="SUISSE" 

THEN p(4)=p(4)+1:IF p(4)<>1 THEN GOSUE 1 
840:GOT0 820 ELSE G0TO 1790 

920 RESTORE 1350:1F UPPER$ (p$)="ITALIE" 
THEN p(5)=p(S)+1:1F p(5)<>1 THEN GOSUB 1 

860:G0T0 820 ELSE GOTO 1790 

30 RESTORE 1390:1F UPPERS (p$) ="POLOGNE" 
THEN p(6)=p(6)+1:1F p(6)<>1 THEN GOSUB 
1B60:G0T0 820 ELSE 1790 

940 RESTORE 1410:1F UFPERS (p$)="GRANDE E 
RETAGNE" OR UPFERS (F#$)="GRANDE-BRETAGNE" 

THEN p(7)=p(7)+1:1F p(7)€>1 THEN GOSUB 1 
860: GOTO 820 ELSE 1790 

950 RESTORE 1440:1F UPPERS$ (p$)="ISLANDE" 
THEN p(B)=p(8)+1:1F p(8)<>1 THEN GOSUB 
1860:G0T0 820 ELSE 1790 

960 RESTORE 1460:1F UPPERS (p#)="GRECE" T 

HEN p(9)=p(9)+1:1F p(9)<>1 THEN GOSUB 18 
60:G60T0 820 ELSE 1790 

970 RESTORE 1490:1F UPPERS (p$) ="YOUGOSLA 
VIE" THEN F(10)=P(10)+1:1F P(10)€>1 THEN 
GOSUB 1860:G0T0 820 ELSE 1790 

980 RESTORE 1510:1F UPPERS (p$)="ALBANIE" 
THEN p(11)=p(11)+1:1F p(i11)<>1 THEN G0S 
UB 1860:G0T0 820 ELSE 1790 

990 RESTORE 1530:1F UPPERS$ (p#$)="AUTRICHE 
“THEN p(i2)=p(12)+1:1F p(12)<>1 THEN 60 
SUB 1860:G0T0 820 ELSE 1790 

1000 RESTORE 1550:1F UFPERS (p$) ="HONGRIE 
“THEN p(13)=p(12)+1:1F p(13)<>1 THEN G0 
SUB 1860:G0T0 820 ELSE 1790 

1010 RESTORE 1570:1F UPPERS (p$)="TCHECOS 
LOVAQUIE" THEN p(id4)=p(14)+1:1F p(i4)<1 
THEN GOSUB 1860:G0T0 820 ELSE 1790 

1020 RESTORE 1590:1F UPPERS (p$) ="ROUMANI 
E" THEN p(15)=p(15)+1:1F p(15)<>1 THEN G 
OSUB 1860:G0T0 820 ELSE 1790 

1030 RESTORE 1610:1F UPPERS (p$) ="BULGARI 
E" THEN p(16)=p(16)+1:1F p(16)<>1 THEN G 

OSUB 1860:G0T0 820 ELSE 1790 

1040 RESTORE 1630:1F UPPERS (p$) ="NORVEGE 
" THEN p(17)=p(17)+1:1F p(17)<€>1 THEN GO 
SUB 1860:G60T0 820 ELSE 1790 

1050 RESTORE 1660:1F UPPERS (p$)="SUEDE" 
THEN .p (18)=p(18)+1:1F p(18)<>1 THEN GOSU 
B 1860:G0T0 820 ELSE 1790 

1060 RESTORE 1690:1F UPPERS (p$)="F INLAND 

E" THEN p(19)=p(19)+1:1F p(19)<>1 THEN G 
OSUB 1860:G0T0 820 ELSE 1790 

1070 RESTORE 1720:1F UPPERS (p#)=" IRLANDE 
“ THEN p(20)=p(20)+1:1F p(20)<>1 THEN 6 

OSUB 1860:GO0T0 820 ELSE 1790 
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1080 RESTORE 1740:1F UFFERS(p#$)="FORTUGA 
L' THEN p(21)=p(21)+1:1F p(21)£;1 THEN G 
OSUE 1860:G0T0 820 ELSE i796 
1090 RESTORE 1750:1F UFFERS(p#)="FAYS-BA 
S" OR UPFERS(P#)="FAYS BAS"THEN pi22)=p{ 
22)+1:1IF p(22){:1 THEN GOSUB 1860:507T0 8 
20 ELSE 1790 
1100 RESTORE 1780:IF UPPERS (p#$)="DANEMAR 
E" THEN p{23)=p(23)+1:1F p(23)£51 THEN G 
OSUB 1860:G0T0 820 ELSE 1790 
1110 RESTORE 1310:1F UFPFERS (p#)="BELGIQU 
E" THEN p(24)=p(24)+1:1F p(24)£;1 THEN G 
OSUR 1860:G0T0 820 ELSE 1790 
1120 RESTORE 1330:1F UPPER$ (p$) ="LUXEMEQ 
URG" THEN p(25)=p(25)+1:1IF p(25)#;1 THEN 
GOSUE 1860:GO0T0 820 ELSE 1790 
1130 RESTORE 1270:1IF UFFERS(p#)="RDA" TH 
EN p(26)=p(26)+1:IF p(26)<*1 THEN GOSUB 
1860: G0T0 820 ELSE GOTO 1790 
1140 PRINT#7, "REFONSE FAUSSE'":FOR ni T 
O Z000:NEXT n:bonus=bonus-2:CLS#2: GOTO 
820 
ISO EEE See RPANOETTES e 
1160 DATA 60,74, 62,75, 69,86, 71,83, 
F0, 9 0807 GB IOTS 70 EU ET OT ST 
05,766 106%65,108 %61/110,7%989; 110 
O0 He MOBIL PP OU TDR D O0 ET7 SET Û, 
118, 64,116, 66,118 
1170 DATA 68,113, 70,113, 74,111, 74, 
120078 17 70 LE ES LI SOS SEL 
1180 DATA 93,119, F9 42540024 EE 
OS LAS ELIOTEO, 2SSEOSE LIGUE AE 
SOS TO HO 09 89e EI0S 66,7 111,60 
ges AUS Ba a TS À NP ee À EP AEUT AR RUES D EUR ESS | 
15 08% 107,028 0102/9819 9308,0.270% 00: 
85,60, 90,62, 75,68, 70,66 
1190 DATA 60,74, 555,999, 120,58, 120 
520, 116,46, 114,48, 114,52, 116,54, 
LB S8 120690119777? 
PRO rene ee CSP meet Herr 
1210 DATA 20,40, 26,29, SOS TAN 
2 70030, 09750, 63553700, 42,:.094 
Se 7/0, 50685635, 2%89;60,- 000, 62,::73,0 
8, 70,66, 60,74, 46,78, 44,82, 29,8 
9, :126,86.,:24,907 22,86, 24,85, 22,7 
7, 20,76, 27,74, 131,74, 34,70, "23,9 


9,,.-24,91 

FRE DATA 20,40, 999,999 

12 Sr ne mp 

1240 DATA 143,138, 140,130, 145,120, 
134,118, 132,114, 128,112, 142,108, 
144,100, 147,99, 148,97, 143,91, 126 
570, 125,93, 117,94, 123,108, 116,10 
8, 119,120, 116,116, 116,120, - 122,13 
DJ, 125,128, 132,138, 133,145, 138,14 
3, 136,142 

1250 DATA 143,138,999,999 

LAOOT ESS PES ses 


1270 DATA 143,138, 152,142, 153,135, 
1e dei 155,120,#-155,111, : 150,113, 
142,108, 138,112, 132,114, 154,118, 
140,120, 140,130, 143,138, 999,999 
LÉRIO) Re SES One ere 
1290 DATA 130,85, 126,90, 123,93, 117 
PR I0 m1, 115,90, 110,88, 105,85, 
PONS MAIS EU 017,82, 120,80, 12 
SOL 0,01,00130,85,::999,909 
PAS een RAT AUS Sr 


1310 DATA 103,127, 106,126, 116,120, 


116,116, 412,114, 110,110, 103,114, 
100,124, 103,127, 999,999 
ET En luxembourg----------- 


1350 DATA 116,116, 112,114, 110,110, 
MONO ANS 120, 20116;,:116,4, 999,999 
RERO EE ee UE ER SR ee 
1SS0NDATAM12,65,0 107,70, 110,72, 108 
ton 9300011782, 120,90, : 123,83, 
OH S0N85,00162,87, 139,95, 14 
0,82, 145,80, : 146,74, 138,71, 137,63 
1 144,57, 144,50, 147,47, 157,44, 
99:42, 164,38, 168,33, 167,27, 165,3 
2, 160,32 
1360 DATA 157,28, 160,22, 158,20, 156 
HOMO 9 ,0#152,20, 155,21, 155,30, 
150,30, 136,45, 139,45, 140,40, 13 
9:49, 130,90, 127,55, 126,60, 118,68 
nl os 20b9; 2993999, 150,18, «1 
46,12, 148,6, 146,6, 144,8, 142,8, 
134,14 
1370 DATA 136,18, 128,18, 140,16, 30 
18, 2999% 909 120,44, 120,38, 118,36 
SH UP0, 340 1416,28;:: 114,29, 112,26, 1 
10,30, 112,36, 110,42, 112,40, 120,4 
HS AT 
RES nt ent 2 CE CRT pOolQgnes rc 
1390 DATA 153,135, 166,129, 172,130, 
175,126, 180,138, 190,135, 194,136, 
SOS 001976, 125," 193,120, 1 195,112, 
198,108, 1898,103,, 193,98, 185,100, 1 
ALOONEM09, 1092165105, 159,112, 1 
JON 0199,120152,127, 155,135, 9 
20 
TO  — grande bretagne----- 
1410 DATA 60,129, 69,126, 71,129, 62, 
129069127088; 125, 95,127, 90,130, 
95,132, 97,137, 90,140, 94,145, 90 
1153, 88,156, 90,160, 84,166, 95,176 
108,178, 018$,176, 92,183, 83,185, 8 
3,181, 79,182, 78,177, 73,173 
1420 DATA 77,172, 73,166, 77,170, 78, 
168, 76,163, 74,163, 73,160, 80,158, 
78,148, 72,150, 70,146, 73,144, 65 
0 071,199, )74,132, 87,133 


mr60 4129 0090 
LEE Islande see 


1440 DATA 46,249, 53,244, 55,279, 59, 
240, 67,238, 66,240, 70,238, 79,241, 
77,247, 02,252): 76,254 73 2820070 
1299 695,253, 64,258, 60,255, 62,261 
s 2,261, 97,256, 54,254,r 47,257, 5 
2,290, 46,249, 999,999 
TASONNERE SEE tee Jesse 
1460 DATA 180,17, 193,17, 194,14, 186 
116, 182,14, 182,10, 185,9, 186,5, 
195,1, 195,3, 119340, 196,10, 0197,45 
» 193,20, 191,30, 193,34, 196,30, 2 
00,30, 198,35, 210,34, 215,42, 212,4 
91 207,40, 200,43, 193,40, 188,236 
1470 DATA 183,37, 182,32, 175,29, 180 
117, 01999999 
LABOUR yYougoslavie----------- 
1490 DATA 145,80, 146,74, 145,73, 146 
507, 150,71, 150,65, 167,48, 175,44, 
175,48, 180,48, 181,40, 183,37, 18 
8,36, 193,40, 195,43, 192,48, 195,50 
s 192,62, 190,65, 185,65, 180,77, 1 
67,75, 160,81, 152,79, 145,80, 999,9 
99 
fe] 9 [0 PE ee albanie------------ 
1510 DATA 175,44, 173,52, 175,29, 187 
132, 185,37, 181,40, 180,48, 175,48, 
175,44, 999,999 
1920 SES autricherss- 
1530 DATA 130,85, 132,87, 139,85, 140 
582, 145,80, 152,79, 161,83, 163,90, 
164,95, 193,99, 152,96, 148,97, 14 
3,91, 127,90, 130,85, 999,999 
1540 =--------=- hongrie-----==-=-- 
1550 DATA 190,93, 183,96, 180,93, 174 
572, 172,88, 163,90, 160,81, 167,75, 
180,77, 187,82, 187,87, 190,93, 99 
SR 


1570 DATA 163,90, 164,95, 155,99, 152 
576, 148,97, 147,99, 144,100, 142,10 
8, 150,113, 155,111,: 159,112, 167,10 
9, 165,109, 175,100, 183,100, 193,98 
1 190,93, 183,96, 180,93, 174,92, 1 
72,88, 163,90, 999,999 
1580 ‘----—--—- FOUMAN Ïe---—— me 
1590 DATA 190,93, 187,87, 187,82, 180 
577, 185,65, 190,65, 192,62, 197,57, 
208,59, 216,63, 222,61, 225,60, 22 
3,65, 228,68, 228,70, 220,74, 221,82 
5 215,91, 202,87, 198,91, 195,90, 1 
90,93, 999,999 
1600 ‘= bulgarie----------- 
1610 DATA 212,45, 207,40, 200,43 193 


140, 195,43, 192,48, 195,50, 192,62, 
19/51 20 07 elos bre 22 ol, 22 
3,09, 220,94, 219,49, 223,49, : 224,47 
FhalGid 1; 212,49, 799,990 
DOC EEE HOPYÉEDB= Arr Ten 
1650 DATA 194,258, 172,244, 174,242, 
166,227, 146,211, 151,208, 140,205, 
SPAS PES MOCS MONS PR AUS LS 0e fn 12 NA PRES Dr PI Ne mt 
150,187, 125,180," 128181, 126,176, 
124,178, 130,170, 142,176, 145,182, 
146,174, 149,174, 149,180, 153,185, 
192,190 
1640 DATA 155,192, 152,196, 156,210, 
160, 21021602,214; 7605219, -164$2270, 
165,227, 170,230, 170,236, 180,243, 
185,245, 195,248, 195,245, : 197,252, 
202,254, 207,250, 210,255, 206,255, 
209,290;,:: 200,260, 194,298;7:999,999 
DONNE er vom SUBTÉS TER ET eee 
1660 DATA 144,174, 149,174, 149,180, 
195,185,::192,190,%:199,192;;: 192,196, 
196,210, 100,210, 162,214; 100,215, 
164,220, 165,227, 170,230, 170,236, 
180,243, 185,243, 184,246, 190,240, 
Po 2295195,222; 109,220," "184,210; 
180,208 
1670 DATA 172,198, 170,183, 175,160, 
LAPTOP A/S RAS LE 2e 106; 168; 
VOS 1908195, -#109,190 "199,146 
los) 161100; 2146/1747) 999,909 
DRE RME FINPANÉS ES eee 
1690:DATA 195,222, 199,229, 190,240, 
184,246, 185,249, 195,245, 197,252, 
202,254, 207,290, 206,244, 209,240, 
ADN ESA, 21,227 121682196215 210; 
Prose Us Ce109188, 200180192177; 
PS TOI CIS, 195, 210320051953, 208, 
IS els 
1700 DATA: 198,213, 198,220, 7 199;,222, 
209,290 
2 KGAR CG ET Irlande ss 
1720 DATA 60,143, 64,147, 64,152, 66, 
154, 66,156, 71,158, 70,160, 71,163, 
68,165,::09,164,::62,168,;-759/169,: 61 
1164, : 56,162, 952,164, : 50,162; 52,160 
149,198, 790,192, 48,190," 46,148, 4 
3,147, 50,143, 97,146, 60,143, 999,9 
99 
MASON ES Portugal srsssssseee 
1740 DATA 22,77, 26,76, 27,74, 51,74, 
34,7/04%23,599,:524/91, 20540, :89,45, 
1200 Et l0 Sal 2 0,60, 109,70; 
Me /ee998 799 
ARR ER gen PAYS DAS man emo 
1760 DATA 122,125, 120,138, 114,136, 
LÉ SA CES ISO TR IS, 106;129,> 
LOS T2 TO IZOS CAT, 120, 7122, 135; 
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DAT LI 
A AE RU rt En nt à danemarke=essssss 
1700 -D4TA 135,290, 13051932; 1350/1568, 
LA 1856-1580 /160$2 0002199 ISA 47e 
LED LAS LS AA SSI ONET 00 GONE 
8,988 
1790 READ xa,ya:FLOT xa#i.5,ya*1.5. 
1800 READ x%,y 
1810 IF x=999 THEN 1840 ELSE IF x=555 TH 
EN 1790 
1820 DRAW x*1.5,y*#1.5 
1820 GOTO 1809 
1840 CLS#Z:sc=sc+1:FOR n=i TO SOO:MNEXT:E 
NV:1,19,=1,1O0:ENT:1,10,4,7,1,=20, 1: SOUND 
2,400,0,15,1,2:G0T0 820 
1850 END 
1860 PRINT#7,"  DEJA DONNE'":FOK dei TO % 
OGC: NEXT: RETURN 
1870 FOR n=i TO 10:FRINT CHR$(7) :LOCATE 
7,24:FRINT"Appuyez sur une touche...":F0 
KR d=i TO 4O00:NEXT d:LOCATE 7,Z4:FRINT" 
“"#NEXT n 
1880 WHILE INKEY$="":WEND 
1890 MODE O:FOR n=2 TO 24:LOCATE 1,n:FRI 
NT CHARS (64): : LOCATE 20,n:PRINT CHR$(64); 
:NEXT n 
1900 FOR n=i TO 20:LOCATE n,1:PRINT CHR$# 
(&4):NEXT n:FOR f=1 TO 20:LOCATE f,25:PR 
INT CHR$(64)3::NEXT f:LOCATE 5,8:PRINT"VO 
TRE NOTE :" 
1910 LOCATE 7,16:FRINT CINT(20/25%sc):"/ 
20" 
1920 FOR tp=i TO ZOOO:NEXT tps1F w=l THE 
N PRINT CHR$ (23) ; CHR$ (O0) :G0T0 20460 ELSE 
RUN 150 
19:20 MODE 2 
1940 ZÜNE 40 
1950 LOCATE 20,4:PRINT"Voici les"s;26-sc; 
"pays que vous avez oublies :" 
1960 LOCATE 21,5:FRINT" 
1970 PRINT: PRINT: PRINT :FRINT 
1986 FOR n=1i TO 25 
1990 IF p(n)=0 THEN no=noti: PRINT 
“sp$(n), 
2400 NEXT n 
2010 PFLOT 10,10:DRAW 630,10: DRAW 620,390 
:DRAW 19,390:DRAW 10,10 
2020 FLOT 5,5:DRAW 635,5:DRAW 625,295: DR 
AW 5,295: DRAN 5,5 
20230 LOCATE 25,24: FRINT"ENFONCEZ UNE TOU 
CHE POUR LA SUITE...":WHILE INKEY$="":WE 
ND:G0T0 1890 
2040 DATA FRANCE,ESPAGNE ,RFA, SUISSE, ITAL 
IE, FOLOGNE , GDE-B, ISLANDE , GRECE, YOUGOSLAV 
IE, ALBANIE, AUTRICHE, HONGRIE, TCHECOSLOVAQ 
UIE, ROUMANIE, BULGARIE 


2050 DATA NORVEGE, SUEDE, FINLANDE, IRLANDE 
, FORTUGAL,FAYS BAS, DANEMARE, BELGIQUE, LUX 
EMBOURG, RDA 

PS BR TA ARS le voyage ----- 


2070 ON EREAE GOSUE 3850 

2080 MODE 1 

2090 deriv=i:sc=0:w=wt+i : 

2100 IF FEEK(43903)=1 THEN BORDER iG:1INE 
0,24:INE 1,13:INE 2,123:INE 3,1 

2110 IF FEEK(45903%)=2 THEN BORDER 2: INE 

O,1:INE 1,16:INK 2,i6:INE 3,27 

2170 ORIGIN 0,0 

SPAIONCLES 

2140 RESTORE 1160 

2150 READ xa,ya:IF xa=888 THEN 2216 ELSE 
FLOT xa#1.5,ya*1.5 

2160 READ x,y 

2170 IF x=999 THEN 2150 ELSE IF x=555 TH 

EN 2150 

2180 DRAW x#1.5,y#1.5 

2190 GOTO 2160 

POUR TER er dessin des cadres----- 
2210 PLOT 8,8,3:DRAW 250,8: DRAW 350,290: 
DRAW 8,290:DRAW 8,8:FLOT 4,4: DRAW 255,4: 
DRAW 355,2395:DRAW 4,395: DRAW 4,4 

2220 PLOT 362,:88:DRAN 628,288: DRAW 628, 
10: DRAW 362, 10: DRAW 362,388 

2250 FLOT 14%,:84,3:DRAW 208,384: DRAW 20 

8,324: DRAWN 142,334: DRAW 142,384 

2540 FLOT 414,224: DRAW 576,224: DRAW 576, 
206: DRAW 414,206: DRAW 414,274 

2250 FLOT 366,:84:DRAW 624,384: DRAW 624, 
302: DRAW 366,302: DRAW 366,264 

2260 PLOT 266,80:DRAW 624,80: DRAW 624,14 
:DRAW 266,14: DRAW 366,80 


2280 IF deriv=i THEN deriv=0:GO0OTO 232 

2290 LOCATE 20,9:PRINT"mer":LOCATE 21,10 
: FRINT'"du":LOCATE 29,11:PRINT'"'Nord'":IF u 

=1 THEN RETURN 

23500 LOCATE 6,7:FRINT"A":LOCATE 6,B8:FRIN 

T't":LOCATE 6,9:PRINT"I":LOCATE 6,10:PRI 

NT'"a":LOCATE 6,11:PRINT"n":LOCATE 6,12:F 

RINT"t'":LOCATE 6,13:PRINT"i":LOCATE 6,14 
:FRINT'"q'':LOCATE 6,15: PRINT"u":LOCATE 6, 
16: PRINT'e":IF uzi THEN RETURN 

2310 LOCATE 18,21:PRINT"mer":LOCATE 14,2 

Z:FRINT"Mediterranee":1F u=1 THEN RETURN 
2320 WINDOW#1,24,239,2,6:PFAPFER#1,1:FEN#1, 
3: CLS#1 

2350 WINDOW#2,10,13,2,4:PAFERK#2,2:FEN#2, 
3: CLS#2 

40 WINDOW#3,27,36,12,12Z:FAFER#S, 2: FEN# 

3: CLS#3 

350 WINDOW#4,24,3 


7% 
Ex 
3, 
5 
2 


, 21,24: PAPER#4, 1: PEN# 


4,23:CLS#4 

22606 WINDOWS ,24,39,15, 18: FAFERKS, L: FEMN# 
Ne 

2270 IF w=2 THEN FLOT 366,176: DRAW 624,1 
76: DRAW 624,110: DRAW 266,110:DRAW 266,17 
ë 

2350 IF w=i THEN LOCATE#4,2,2:PRINT#4,CH 
H$(247)j3;" Exercice 1":LOCATE#4, 4,3:FRIN 
T#4,"Exercice 2" 

2390 IF w=2 THEN LOCATE#4,4,2:FRINT#4,"E 
xercice Î"':LOCATE#4,2,3:FRINT#4,CHR& (24% 
j:" Exercice 2" 

2400 scz=0:LOCATE#Z, 1,2:PRINT#2,sc 

2410 RESTORE 23880 

2420 PLOT -2,-2,3:PRINT CHR$ (23); CHR# (1) 
3: TAG:FOR n=1i TO Z6:READ dé,di,d2,dd# 
2450 MOVE di,d2:FRINT CHR#(144)3;:NEXT n: 
TAGOFF : FRINT CHR$ (223) ; CHR$ (0) 3: RESTORE 
2680 

2440 message$="Ou se situe" 

2450 GOSUB 4170 

2460 GOSUB 3930 

2470 GOSUB 4220 

2480 GOTO 2450 

24#0 END 

AOODO) eee EEE visualisation ---- 
2510 ON BREAK GOSUE 23850 

2520 MODE 1:FLOT 26,150,1:DRAW #99,150:D 
RAW 296,184: DRAW 20,184: DRKAW 20,150 

2530 PLOT 4,594,1:DRAW 634,594: DRAW 634, 
4: DRAW 4,4: DRAW 4,394 

2540 LOCATE 2,2:FRINT"'CESFACE]" 

2930 LOCATE 2,24:FRINT"CESC] pour fin“ 
2360 ORIGIN 250,0 

29/70 IF PEEK(43903)=1 THEN BORDES 10: INE 
O,18:INE 1,0:INE Z,14:INE 3,0,26 

2580 IF PEEK(43905)=2 THEN BORDER : 3: INE 

O0, 12INK 1,16: INK02,152%INK;S,0,26 

2590 RESTORE 1160 

2600 READ xa,ya:IF xa=B88 THEN 2850 ELSE 
PLOT Kka#1.5,ya*#1.5,2 

2610 READ x,y 

2620 IF «x=999 THEN 2600 ELSE IF x=555 TH 

EN 2600 

2630 DRAW x#1.5,y#1.5,2 

2640 GOTO 2610 

2650 WINDOW#1,3,18,15,15:PAPER#1,0:PEN#1 
Î 

L 

2660 i=0:11=0 

2670 WHILE INKEY(47)<:0:WEND: SOUND 1,RND 
(1)#200,3,15:co=0:i=itl:ii=isiF i=27 THE 

N i=i:ii=i:LOCATE#I, (1é-LEN(p#(i)))/%,1: 

FRINT#1,p#(1) ELSE LOCATE#1, (16-LEN(pP#(i 
)))/2%,1:FRINT#1,p#(1) 

2680 ON i GOSUR 2750,2760,2770,2780,2790 
.2800,2810,2820,2830,7840,2850,2860,2870 
, 2880, 2890, 2900,2910,2920,2920,2940,295û 


000 


,2960,2970,2980, 2990, 3000 

2690 GOTO 2710 

2700 WHILE INKEY(47)<25>0:WEND: SOUND 1,RND 
(1)#200,3,15:CLS#1:co=1:0N ii GOSUE 2750 
,.2760,2770,2780,2790,2800,2B10,2820,28:0 
.2840,2850,2860,2870,2880,2890,2900,2910 
,2920,29%0,2940,2950, 2960, 2970, 2980, 2990 
, 2000 

2710 PE Ka,ya:IF co=0 THEN FLOT xa#i.5 
,Ya*1.,5,3 ELSE FLOT xa*1,5,ya*1.5,2 

2720 READ K,Y?I1F x=555 THEN 2710 ELSE IF 
x=999 THEN IF co=0 THEN 2700 ELSE 2670 
2750 IF co=0 THEN DRAW x#1.5,y*#1.5,3 ELS 

E DRAW x#1.5,y#1.5,2 

2740 GOTO 2720 

2750 RESTORE 1160:RETURN 

2760 RESTORE 1200:RETURN 

2770 RESTORE 1240:RETURN 

2780 RESTORE 1280:RETURN 

2790 RESTORE 1340:RETURN 

2800 RESTORE 1380:RETURN 

2810 RESTORE 1400:RETURN 

2820 RESTORE 1430:RETURN 

2850 RESTORE 1450:RETURN 

2840 RESTORE 1480:RETURN 

2850 RESTORE 1500:RETURN 

2860 RESTORE 1520:RETURN 

2870 RESTORE 1540:RETURN 

2880 RESTORE 1560:RETURN 

2890 RESTORE 1580:RETURN 

2900 RESTORE 1600:RETURN 

2910 RESTORE 1620:RETURN 

2920 RESTORE 1650:RETURN 

2920 RESTORE 1680:RETURN 

2940 RESTORE 1710:RETURN 

2950 RESTORE 1720:RETURN 

2960 RESTORE 1750:RETURN 

2970 RESTORE 1770:RETURN 

2980 RESTORE 1310:RETURN 

2990 RESTORE 1330:RETURN 

3000 RESTORE 1270:RETURN 

3010 ENCYCLOPEDIE ---- 
3020 MODE 2 

3030 IF FEEK(45903)=1 THEN BORDER 103: INF 
G,5:INE 1,26:FAPER O:PEN 1 

3040 IF PEEK(43903)=2 THEN BORDER 3: INK 

O,1:INE 1,16:PAPER O:FEN 1 

3050 WINDOW#1,55,78,3,15:PAPER#1, 1: FEN#1 
,D:CLS#1 

3060 FLOT 428,370,1:DRAW 628,370: DRAW 62 

8,156:DRAW 428,156:DRAW 428,370 

3070 ON BREAFH GOSUB 3850 

2080 y2=i:y3=3 

3090 GOSUB 3450 

4100 rest=rest+i:1F rest=27 THEN rest=i 
3110 IF rest=i THEN RESTORE 3590:GOSUR 3 


370:0RIGIN 2350,100:RESTORE 1160:GO0T0 435, 
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(e) 

3120 IF restz=? THEN RESTORE 3600:GOSUB 3 
Z7O: ORIGIN 420,130: RESTORE 1210:G0T0 435 
(a) 

3150 IF rest=3 THEN RESTORE 3610:GO0OSUE 3 
270: ORIGIN 280,70:RESTORE 1240:6070 4350 
3140 IF rest=4 THEN RESTORE 3620: GOSUR 3 
370: RESTORE 1290:G60T0 4350 

3150 IF rest=S THEN RESTORE 3640: GÜSUE 3 
270: ORIGIN 260,160: RESTORE 1250: GO0OT0 455 
Q 

3160 IF rest=6 THEN RESTORE 3650:GD0SUR 3 
370: ORIGIN 170,60:RESTORE 1390:G60T0 4350 
3170 IF restz/7 THEN RESTORE Z660:GOSUB 3 
370: ORIGIN 360,-40:RESTORE 1410:G0T0 435 
(a) 

32180 IF rest=8 THEN RESTORE 3670:G0SUE 3 
370: ORIGIN 400,-250:RESTORE 1440:G0T0 43 
3C (} 

3190 IF restz=9 THEN RESTORE 2680: GOSUE 3 
370: ORIGIN 150,200:RESTORE 1460:G0OT0 435 
(e) 

2200 IF rest=10 THEN RESTORE 3690:GOSUE 
3370: 0RIGIN 180,170:RESTORE 1490:G0T0 43 
50 

3210 IF rest=ii THEN RESTORE 23700:GOSUE 
3370: RESTORE 1510:GO0T0 4350 

3220 IF rest=12 THEN RESTORE 23710:GOSUH 
3370: 0RIGIN 220,100: RESTORE 1530:G0T0 47 
sû 

3250 IF rest=15 THEN RESTORE 2Z720:BGO0SUR 
3370: 0RIGIN 190,80:RESTORE 1530:G60T0 455 
o 

3240 IF rest=i4 THEN KRESTORE 3720: GOSUE 
2370: 0RIGIN 190,70: RESTORE 157/70:G60T0 435 
[a 

3250 IF rest=1i5 THEN RESTORE :740:GOSUER 
3370: 0RIGIN 120,110:RESTORE 1590:G0T0 45 
50 

2260 IF rest=ié THEN RESTORE 3756:GOSUER 
3370: 0RIGIN 120,150:RESTORE 1619:G60T0 45 
20 

2270 IF rest=17 THEN RESTORE 2760:GOSUE 
3570:0RIGIN 190,-160:RESTORE 1630: GO0OT0 4 
350 

3280 IF rest=18 THEN RESTORE 5770: GO0OSUR 
2370: 0RIGIN 190,-130:RESTORE 1660: GOTO : 
350 

3290 IF rest=19 THEN RESTORE 3780: G0OSUE 
23570:O0RIGIN 120,-160:RESTORE 1690: G0T0 4 
350 

3300 IF rest=70 THEN RESTORE 3790:GOSUR 
3370:0RIGIN 410,-60:RESTORE 1720:G0T0 43 
50 

3310 IF rest=21 THEN RESTORE 3800:GOSUB 
3370:0RIGIN 480,120: RESTORE 1740:G0T0 43 
90 

3320 IF rest=22 THEN RESTORE 3810:GOSUR 


3370: ORIGIN 290, 20: RESTORE 1750: G0T0 455 
o 


3330 IF rest=23 THEN RESTORE 3820: G50SUE 


3370:0RIGIN 260,-10:RESTORE 1786:G0T0 43 
30 

3240 IF rest=24 THEN RESTORE 3620:GOSUE 
23570: 0RIGIN 280,70:RESTORE 1260:G0T0 425 
Q 

3550 IF rest=25 THEN RESTORE 38:20: GOSUE 
2270: ORIGIN 320,30:RESTORE 13:0:G60T0 435 
(9) 

32260 IF rest=26 THEN RESTORE 3846: GOSUR 
2370: ORIGIN :10,4G:RESTORE 1310:G0T0 435 
(a 

3370 READ a$:LOCATE 52,y23:CALL &BB9C:FRI 
NT a$:CALL &BB9C:FOR n=1 TO G:REÂAD a$:y25 
=yi+2:LOCATE 32,yS:FRINT a$:NEXT n 

32806 RETURN 

3390 IF INÉEY(47)=0 THEN 3400 ELSE IF IH 
EEY(18)=0 THEN 4390 ELSE 3390 

3400 CLS#1 

2410 vai: yi=i 

34306 FOR n=1i TO 9:y23=y3+2:LOCATE 22,y2:F 
RINT STRING#S(21," ")3:NEXT n 

FA4FQ yi=l:y3=3 

3440 GOTO 3100 

ASUS ETES SEEN affichage tableau vi 
CPOBN SSSR 

3480 RESTORE 3090 

3470 FLOT 6,394,1:DRAW 634,394: DRAW 46:4, 
&: DRAW 6,6:DRAW 6,394 

3480 FLOT 2,398,1:DRAW 638,398: DRAW 638, 
Z2:DRAW 2,Z:DRAW 2,398 

3490 FOR y=374 TO 22 STEP -32:PFLOT 56,y, 
1:DRAW 420,y:NEXT y 

3500 FLOT 50,2:76:DRAW 422,376:PLOT 50,20 
:DRAW 42,20 

2516 FLOT 50,374:DRAW 50,22:PLOT 235,374 
:DRAW 220,22:FLOT 420,374: DRAW 420,22 
3520 FLOT 48,276: DRAW 48,20:PLOT 232,376 
:DRAW 232,20:PLOT 422,376: DRAW 422,270 
3530 LOCATE 58,18:FRINT'CENTERI]I pour gr 
aphe" 

2540 LOCATE 58,20:FRINT"'CESPACE] pour su 
ite" 

3550 LOCATE 59,27Z:PRINT"CESC] pour fin 
3560 DATA Nom officiel,Nom courant,Super 
ficie en km2,Fopulation,Capitale,Monnaie 
.Gdes villes,Religion,Langue 

3570 FOR i=i TO 9:y2=y2+2:READ atl1$:LOCA 
TE 10,y2Z:PRINT ati$:NEXT i 

3580 RETURN 

2590 DATA FRANCE,-,551 000,54 257 000,FA 
RIS, franc,Lyon Marseille,catholicisme ro 
main, francais 

3600 DATA ESPAGNE, -,505 000,37 654 O06,M 
ADRID,peseta,EBarcelone Grenade,catholici 


sme romain,espagnoi 

2619 DATÉ RFA,âllemagne de l'ouest,Z48 :i 
06,61 66ë G060,BONN,mark, Munich Francfort 
,pProtest/catholicisme,allemand 

2620 DATA RDA,Allemagne de l'est,107 500 
.16 736 GOG, BERLIN est,mark,Dresde Leipz 
19,protes/catholicisme, SEA 

2620 DATA CONFEDER. HELYVETIQUE, Suisse, 41 
000,46 473 OGOG,BERNE, franc,Geneve Zurich 
.protest/catholicisme,francais/allemand 
2640 DATA ITALIE,-,300 000,57 197 GO06,RD 
ME,lire,Venise Naples,catholicisme,itali 
en 

3650 DATA FOLOGNE,-,2313 000,25 902 006, 
ARSOVIE,zloty,Gdansk Fr d cathatinse 
me,polonais 

2660 DATA ROYAUME UNI, GRANDE ERETAGNE, 24 
3 000,56 2300 000, LONDRES, livre,Belfast G 
lasgow,protestantisme,anglais 

2670 DATA ISLANDE,-,102% 000,231 OGG,REYE 

JAVIFÉ,couronne,-,protestantisme, francais 
anglais 

2680 DATA GRECE, -,122 000,9 707 000,ATHE 
NES, drachme,Corinthe AR AÉMRANEE 

sme,grec 

3690 DATA YOUGOSLAVIE, -,256 000, 22 516 © 

00, BELGRADE, dinar, Sarajevo Zagreb,cathol 
icisme,yougoslave 

2700 DATA ALBANIE,-,28 500,2 795 OOG6,TIR 
ANA, lek,Durazzo,catholicisme,albanais 

3710 DATA AUTRICHE, -,84 000,7 510 GG, VI 

ENNE,schilling, Innsbruck Salzbourg,catho 
licisme,autrichien. 

3720 DATA HONGRIE,-,93 000,10 711 G00,BU 

DAFEST, forint,Debrecen Szeged,catholicis 

me,hongrois 

3730 DATA TCHECOSLOVAQUIE, -,130 000,15 3 
14 0600, FRAGUES, couronne,Bratislava bat ra 

va,catholicisme,tcheque 

2740 DATA ROUMANIE,-,238 000,22 457 060, 

BUCAREST, leu,Arad Galati,catholicisme,ro 

umain 

3750 DATA BULGARIE,-,111 000,8 890 000,5 

OFIA,lev,Plovdiv Roustchouk,catholicisme 
bulgare 

2760 DATA NORVEGE, -,2:24 000,4 099 000,05 

LO,couronne, Bergen Molde,protestantisme, 

norvegien 

3770 DATA SUEDE,-,450 000,8 324 000,ST0C 

EHOLM,couronne,Karlstat Goteborg,protest 

antisme,suedois 

3780 DATA FINLANDE,-,337 000,4 801 G00,H 

ELSINEI , mark, Turku Vaasa,protestantisme, 
finnois 

2790 DATA IRLANDE,Eire,70 000,3 440 000, 

DUBLIN,livre,Cork Limerick,protestantism 

e,anglais 

2800 DATA FORTUGAL,-,91 600,9 931 GG, LI 
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SBONNE ,escudo,Forto La Corogne,catholici 
sme,portugals 

2810 DATA FAYS B45,HOLLANDE,41 200,14 4 
& 000, AMSTERDAM, florin,La Haye Rotterdam 
,protest/catholicisme,hollandais 

2820 DATA DANEMARK, -,43 OO0,S 12% 600,00 

FENHASUE ,couronne,Esbjerg Odense,protest 
‘catholicisme,danois 

28350 DATA LUXEMEOURGS,-,2 600,364 000, LUX 
EMEOURG, franc,-,catholicisme romain, luxe 

mhourgeois 

3640 DATA BELGIQUE, -,20 500,9 870 60G,E 

RUXELLES, franc,âAnvers Liege,catholicisme 
romain,beige 

2890 TAGOFF RUN 150 


An AO re es coordonnees sur la carte--- 

3880 DATA ia france,1i36,154,FParis,la sui 

556,166, 136, Berne, l italie,186,104,kome, 
l'espagne,56,84,Madrid 

2890 DATA le portugal.%é6,104,Lisbonne, la 
gde bretagne,1i20,23%4,Londres,la rfa,190 
.188, Bonn, l'iriande, 76,234, Dublin,la bel 

gique,148,190,Bruxelles,la rda,218,190,B 
erlin,le luxembourg,164,176,Luxembourg 

2900 DATA l'islande,96,374,Reykjavik,les 
pays has,1i70,206, Amsterdam, la yougoslav 
18,256,104,Belgrade, l'albanie,260,70,7Tir 
ana,la pologne,ïéé,184,Varsovie,la grece 
,-66,44,Âthenes 

3910 DATA l'autriche,ï1é6,154,Vienne,la h 

ongrie,266,15%4,Budapest, tchecosliovaquie 
216,164,Frague, la roumanie,206,114,Bucar 
est,la bulgarie,306,84,60ofia 

2920 DATA la norvege,ïté,294,0s10,1a sue 
de, 256,234,Stockhaim, la finiande, 296, 30 
4,Helsinki,le danemark,196,234,Copenhagu 
8,999,999, CRC 

CSA A ATP SRaCUPSBUR Perses 
294Ùù FRINT CHRSCZT) :CHR# (1); 
RUEIL 

2940 TAG 

3970 xours=310:veurs=2iû 

39806 MÔÜVE xcurs,ycurs: PRINT curé; 

29906 FOR tp=i TD BO:NEXT tp 

AGOG MOVE xcurs,ycurs:FRINT cur$:; 

4610 IF INÉEY(1)=0 OR JOY(O)=8 THEN xcur 
s=xcurs+iû 

4020 IF INÉEY(8):=0 OR JDY(O)=4 THEN xcur 
s=xcurs-i( 

AGIO IF INEEY(Gi=0 OR JOY(Qi=1 THEN ycur 
s=ycurs+ii 

4040 IF INÉEY(25=0 Of JOY(G)=2 THEN your 
s=ycurs-10 

4050 IF INÉEY({Si=0 OR JOYiGI=16 OF JOY(G 
)=52 THEN TAGOFF:RETURN 
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4060 IF JOYi0)=9 THEN xcurs=xcurs+10:you 
rs=ycurs+ic 

40706 IF JOY(O)=10 THEN xcurs=xcurs+10:yc 
urs=ycurs-10 

4080 IF JOY(0)=5 THEN xcurs=xcurs-10:ycu 
rs=ycurs+1i0 

4080 IF JO0Y(0)=6 THEN xcurs=xcurs-10:ycu 
rs=ycurs-i0 

4100 IF xcurs:320 THEN xcurs=320 


4110 IF x 220 THEN xcurs=#0 
4120 IF curs:380 THEN ycurs=380 
41:0 IR ycurs<“#0 THEN ycurs=30 
4140 EN 0,-2, 1 


4150 SOUND 1,6,0,8,1,0,20 
4160 GOT0 798 

4170 IF w=2 THEN CLS#S 

4180 LOCATE#1, (16-LEN (message$) )/2,2:FRI 
NT#Ii, messages 

4190 READ pay$,xp,yPp,dd#$:1F pay$="999" 
HEN FOR tp=1 TO 1000:NEXT tp:G0TO 189 
4200 IF w=i THEN LOCATE#1, (16-LE 
/2,4:PRINT#1,pay$ ELSE LOCATE#1 
dd#))/2,4:PRIN 
4210 RETURN 
4220 ‘<= 


2:50 IF 


ycurs YE Lyp+20 THE 
3,4,1:P :sc=sc+ii:liF 
HEN L£ 

:FRIN 

:FRINT#2,sc 


4240 LOCATE 
IF sc£0 


ATE 2. 2: PRINTÉ2, 


sc: LOCATE#2, 2, T B" ELSE IF sc<i 
Q THEN LOCATEM?, 2,22PRINT#2, sc:LOCATE#Z, 
2,2:PRINT#2,"0" EL LOCATE#2, 1, 2: FRINT# 


2,sc 
4250 IF w=2"THEN FAFERX#S, 2: CLS#5: LOCATE# 
599, 2: PRINT#S, "C'etait ":LOCATE#S, (16-LEN 
(pay #0 /2,3#/PRINT#S,pay$ 

42606 FOR 1 TO 8:FOR tp=i TO 3SOO:NEXT t 
P:INE 2,18:FOR tp=i TO ZOO:NEXT tp:1 
 LENEXFSN ES 
4270 FAFER#S,1:CL 
4280 CLS#1: 
4290 ‘ Te ON: 
260 S G; 5 Fa 


ses 8, bé, é 


4510 SYMBOL 242,128,0,2,2,292,192,0,192 
4520 cur$=CHR$ (241)+CHR$ (242) ? 

47:50 SYMEOL 244,2740,128,128,129,0C 
4340 RETURN 


4:60 READ xa,ya:FLOT #a%2,ya*2,0 

4770 READ x,y:1F #=555 THEN 4360 ELSE IF 
«2999 THEN 33590 ELSE DRAW x#2,y#2 

4:60 GOTD 4370 


4400 MODE 2 

4410 IF FEEK{43:903)=1 THEN INK 
,26:PFAFER O:FEN 1: BORDER 10 
4420 IF PFEEK(45903)z2 THEN INE 
,16:PAFER O:FEN 1:BORDER 3 
440 CLS 

4440 
4450 FOR n=i TD 1B:x=x+46:FLOT x,4 Ê 
W x:,380:NEXT ; < 
4460 FLOT 596,198,0:DRAW 596,68 
T 0,200,1:DRAW 640 


0,5:INE 1 


Q,1:1INE 1 


2 


H=r 


PLOT 0,38 


: DRAW 380: PLOT_ : DRAW 640,4 
4480 FLOT 550,400:DRAW 640,100 
4490 LOCATE 17,12FRINT superficie - popu 
lation - densite #demographique" 
4500 LOCATE» 70, 1S5#FRINT"COL.1: SUP." 
4510 LOCATE To: PRINT"COL.2: POP." 

20 LOCATE 20 17: FRINT"COL.3: DEN." 
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RS ds datée ut à A ‘à à 


30 LOCATE 722% PRINT"CENTER]" 
xd=-1:vyd=230 

50 RESTORE 4770 

Q READ x$,hi,h2 

IF x$="B88" THEN IF INKEY(18)=0 THE 
:RUN 150 ELSE 4570 

x$="999" THEN xd=-1:yd=28:GOT0 4 


= A 


) TAG: MOVE XD+4,YD-6:PRINT X$3 

D h2=h2#10:h23=h2/hi 
 h(i)=h1/5:h(2)=h2/50:h (3)=h3%Z 

20 FOR h=1i TO 3 

xb=xd+(h-1)#14 

o yb=yd+(h-1}#14 

à FOR dx=i TO 4 

ù PLOT xb+dx,yb+dx+h(h}),1 

IF dx51i THEN PLOT xb+dx+10,yb+dx,1l: 
xb+dx+10,yb+dx+h(h):GOTO 4710 

> FOR di=1i TD i0 

> PLOT «b+dx+d1, yb+dx:DRAN xb+dx+di,y 
b+dx+h{h) € 

4700 NEXT di. 

4710 FLOT xb#+dx+1GyE 
19,yb+dx+h (h),0 
4720 NEXT dx 

4730 PLOT #b+dx-1,yb+dx+h(h},0:DRAW xb+d 
#—1+10,yb+#dx+h(h),1 

4740 NEXT fi 


+h(h)}:DRAW xb+dx+ 


&:G60T0 4560 
mm donnees pour le ORNE 


O DATA fra,551,540, esp,505,370, su 


1.60, ita,300,570, pol,213,260, r. 
"245,560, isl,103,2.3, gre,132,97, y 
8,230, alb,28,27.9, aut,84,75, h 
07, tch,130,153.1, rou,238, 274. 
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4780 DATA 999,999,999, bul,1i11,88.9, n 
or,224,40.9, sue,450,89.2, fin,337,48, 


iri,70,34.4, 


.4, 


08,167.3, 
,888, 


4790 
4800 
4810 
4820 
4830 
484ù 
4850 
4860 
4870 
4880 
4890 
490 [a] 
4910 
4920 


hol,41i,142 
rda, 1 
ES8 


PONS 27 ent 
dan,43,51.2, rfa,249,616.6, 

Del SO nnlUre en, 
888 


RESTORE 5140 
EVERY 15,1 GOSUE 4870 

EVERY 60,3 GOSUE 4850 

EVERY 15,2 GOSUE 4980 

a$=INKEYS:1F a$="1" OR a$="2" DR a$ 
OR a$="4" THEN DI:RETURN ELSE 4840 
ENV 1,15,-1,1 

SOUND 2,0,15,15,1,0, 1 

ENV 1,15,-1,1 

SOUND 2,0,15,15,1,0,5 

RETURN 

ENV 2,15,-1,3 

SOUND 1,600,45,15,2,0,10 

SOUND 4,5,45,195,2,0, 1 


30 RETURN 


D ENV 3,15,-1,5 
à ENT 1,1, 
0 SOUND 2,10, 


SU Nec ra E 8 Pet MO 
75,15,3,1,10 
RETURN 


Ÿ READ 5:1F s=0 THEN RETURN ELSE IF s 


THEN RESTÜRE 5140:G0T0 4990 ELSE 50 


i$="1" THEN s=451 
i$="2" THEN s=379 
IF i$="3" THEN s=3558 
5030 IF i$="4" THEN s=338 
5040 IF i$="5" THEN s=201 
45050 IF i$="6" THEN s=284 
S060 IF i$="7" THEN s=239 
3070 IF i$="8" THEN s=225 
55080 IF ig$="" THEN RETURN 
5090 ENV 1,1,-1,4 
S100 ENT 1,10,-1,0,10,1,1 
5110 SOUND 1,5,20,14,0,1 
5120 SOUND 4,5*2,20,15,0,1 
1120 RETURN 
514@ DATA 451,0,379,0,201,0,0,451,2379,0, 
307,201 
5150 DATA 451,0,379,0,2301,0,0,451,379,0, 
301,301 
5160 DATA 338,0,284,0,225,0,0,338,284,0, 
225,225 
5170 DATA 338,0,284,0,225,0,0,3238,284,0, 
Pre PE 
5180 DATA 451,0,379,0,301,0,0,451,379,0, 
301,301 
5190 DATA 451,0,379,0,201,0,0,451,379,0, 
301,301 
5200 DATA 338,0,301,258,3238,379,0,451 
5210 DATA 999 
SG220 FIN DU LISTING ?-- 
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DUCHET COMPUTERS & SIREN SOFTWARE 


51 Saint-George Road - CHEPSTOW - NP 6 SLA - ANGLETERRE - Tél. + 44 291 257 80 


EN EXCLUSIVITÉ : DES PROGICIELS SUPER CHOUETTES EN FRANÇAIS POUR AMSTRAD - SCHNEIDER 464/664/6128 


Formatez toutes vos disquettes 3” ordinaires en 416 Koctets 


TURBO ai 6 (175 FF port compris) 


Le super utilitaire acclamé par la presse britannique est désormais disponible en Français 
Compatible 464, 664, 6128 
FORMATEZ les disquettes standard AMSTRAD des lecteurs ordinaires standard AMSTRAD/SCHNEIDER 


AVEC 208 Koctets par face : 


Pour 175,00 FF (disquette 3"') vous recevez non seulement le SUPER FORMATEUR TURBO 416, mais aussi toute une gamme d'utilitaires inédits en France. 
Les 2 faces de la disquette regorgent de programmes (en Français) jamais vus ! Sélection trèssimple par menu ! Quelques-unes des innombrables options : 


1. TURBO 416 (super formateur) 2. Archivage fichier Disé/K7 à 3000 bands 
3. Cherche de données / Fichier maximum 25 caractères ! 4. Re-transfert K7/Disc de l'option 2 
5. Cherche de données / disc - maximum 25 caractères ! 6. Transfert intégral fichiers disc/disc 
7. Générateur de menus 8. Copieur de disquettes (très, très costaud) 
9. Accélère les lecteurs de 20 % 10. Déplombeur 

11. Éditeur de CAT 12. Moniteur de disquette 

13. Éditeur de disquette 14. Listage ASCII écran/imprimante 

15. Plan d'occupation des fichiers 16. Lecteur en-tête K7 et disc 


et bien d'autres. 


TURBO 416, le SUPER COMPENDIUM de super utilitaires en FRANÇAIS ne vaut que 175 FF port compris 


DISCOVERY PLUS 464/664/6128 


Un prodige de programmation EN FRANÇAIS. Pour ceux qui ne peuvent pas s'offrir le luxe d'une interface de transfert, DISCOVERY PLUS est la solution ! 
Transfère PLUS de programmes protégés de K7 à disquette qu'aucun autre soft ! Contient 4 programmes pour transférer : 1. Les “Speedlock” - 2. Les 
“Sans en-tête” - 3. Les Conventionnels” - 4. Les autres... ! Simple à utiliser ! Pas besoin de désassembleur, etc... ! PRIX port compris : seulement 150 FF 
(disque uniquement). 


SUPER TAPE 4000 cpc 464 uniquement 


Le meilleur utilitaire de sauvegarde K7/K7 sur le marché ! Sauvegarde automatique. 10 vitesses de sauvegarde au choix ! Entièrement en FRANÇAIS. 
Cassette : 90,00 FF* - Disque : 120,00 FF (port compris). 


CADEAU ! Commandez les 3 progiciels ci-dessus et nous vous offrons gratuitement en CADEAU le superbe progiciel PRO SPRITE (LA FABRIQUE DE 
LUTINS) valant normalement 125 FF ! Créez et animez des lutins que vous intégrerez à vos programmes personnels ! Un programme de démonstration 
est inclus pour vous assister. Documentation en Français. 


VENTE EXCLUSIVEMENT PAR CORRESPONDANCE - Envoyez vite votre commande (en Français) à : 
DUCHET Computers - 51, Saint-George Road - CHEPSTON NP 6 SLA - ANGLETERRE - Téléphone : + 44 - 291 257 80 


ENVOI IMMÉDIAT LE JOUR MÊME PAR AVION dans le monde entier 
(hors Europe ajouter 10 FF par titre S.V. P.) 


REGLEMENT PAR : 
MANDAT POSTE INTERNATIONAL en francs. 
“EUROCHÈQUE en livres sterling (vous faites la conversion). 
CHÈQUE BANCAIRE en livres sterling compensable en Angleterre (votre banque fait la conversion). 


Rédiger les mandats, etc... à l'ordre de DUCHET Computers. 


Si vous êtes pressé, réservez votre commande EN PARLANT EN FRANÇAIS ! 
Téléphonez à Caroline, Jean-Pierre ou Didier au 44 291 257 80 de 8h à 19h. 


Ces progiciels en Français sont Copyright DUCHET COMPUTERS & SIREN SOFTWARE. Leur diffusion ou reproduction commerciale, même partielle, sous quelque titre ou 
forme que ce soit et par qui que ce soit est formellement interdite sans l'autorisation préalable écrite de DUCHET COMPUTERS SIREN SOFTWARE. 


TOUT POUR L’AMSTRAD 


MICRO ORDINATEURS - LOGICIELS - PROGICIELS 


AMSTRADESK 


Bureau pour ordinateur personnel 


e Structure rigide en tube acier de  * Belle finition d'ensemble. Struc- 


-section rectangulaire. ture acier peinte couleur brun. 
Panneaux de particules plaqués 
e Large espace disponible pour les teck. 


câbles de liaison. e Livré en Kit (grande facilité de 


e Espaces de rangement pour cas- montage). 
settes, disquettes et papier. e Dimensions : 
Hauteur : 889 mm. 
e Equipé de 4 roulettes permettant Longueur : 933 mm. 
un déplacement aisé. Profondeur : 610 mm. 


pour 464, 6128, 8256, MSX 


990T.T.C. en Importation Exclusive 
PI 8256 et 8512 poste informatique 


e Structure rigide en tube acier de section rectangulaire. 

e Large espace disponible pour les câbles de liaison. 

Espace concu pour l'imprimante. 

Equipé de 4 roulettes permettant un déplacement aisé. 

Belle finition d'ensemble. Structure acier peinte couleur gris. 
Dessus bois stratifié gris. 

Livré en Kit (grande facilité de montage). 

Dimensions : 

Hauteur : 680 mm 


Longueur : 1 000 mm 
Profondeur : 700 mm 990 F É TC 
REVENDEURS, nous consulter 
SP 1000 A  29%F;:::: 
DE PORT 
e Vitesse d'impression 100 C.P.S. bi-directionnel optimisé. 


e Friction et traction. Guide feuille. - Introduction auto- 
matique du papier. e Qualité courrier. 


EXTENSION MEMOIRE 256 Ko - KIT POUR 8256 - 
Franco de port : 390 F TTC 
DISQUETTES 3” - Franco de port : 350 F par 10 


Villers ssrécmnnennausnetalns RS none nca ein gene Mara led Codé:] postal isa sanests es Same tenant Lada RE bn ii 
+ AMSTRADESK | :, au prix de 940 F TTC l'unité, nombre... ie ina see dou au een à ee eee dt érn eat à 
e"PI:8266f ..au-prix de 990: F' TTC l'unité. nombres. sue nan ee doser do an end da A ta ren Led 
e.:SP.1000'À |..5-auprix:de 2990 TTC; nombre... aude ver mann ddr te de ner rar ne cn ANT cb en ta 
e Extension mémoire 256Ko pour 8256 |! , au prix de 390 F TTC l'unité, nombre........................,...................,,...... 

. + Disquette 3”: ., au prix de 350 F TTC la boîte de 10, nombre de boîte(s).............................................,....,,,.... 
Ci-joint, mon règlement par chèque. CPC 17 


ni ES 


NEO MEDIA 


TRANSPARENCE, 
TAG ET INVERSION VIDÉO 


Michel ARCHAMBAULT 


| s’agit là de commandes Basic spécifiques aux AMSTRAD 
CPC ; pratiques, spectaculaires, mais aussi avec quelques piè- 
ges qui, bien sûr, ne sont pas mentionnés dans le manuel 
d’origine. Afin de les comprendre facilement et de les ‘’avoir en 
main’’, rien de tel qu’un petit programme de démonstration, dont 
vous pouvez vous inspirer pour augmenter la présentation de vos 


programmes. 


LA TRANSPARENCE 
(Lignes 30 à 140 + 2000 à 2070) 


Chaque caractère affiché à l'écran est en 
fait un petit ‘’pavé’’ carré de 16x16 
pixels (= point d'écran), qu'il s'agisse du 
À, du point ou de l'espace ‘‘blanc'’. De 
ce fait, si l'on superpose un caractère sur 
un autre, le premier en date disparaît 
complètement. 

Avec la commande ‘‘Transparence’’, le 
fond (couleur PAPER) du second carac- 
tère n'efface pas le premier caractère. Il 
y a alors superposition des deux motifs. 

La commande est PRINT CHR$(22); 
CHR$ (1) et, pour l’annuler, c'est PRINT 
CHR$(22);CHR$ (0). 

Comme cette écriture est lourde, 
codifions-la par T1$ et TO$. Voir lignes 
40 et 50. 

Pour notre démonstration, nous utilisons 
une ligne de vingt-cinq ‘‘O’", une ligne de 
cinq ‘+’ et une autre de cinq ‘* —’" (par 
SHIFT 9). Remarquez au passage 
comme l'instruction STRINGS$ est prati- 
que ! (lignes 60 à 90). La ligne 90 défi- 
nit P$ comme étant une suite de vingt- 
cinq ‘pavés curseur’, dont le code 
ASCII est 143. Donc, le second paramè- 
tre de STRINGS$ peut-être indifférem- 
ment le code ASCII ou le caractère mis 
entre guillemets. 

En faisant RUN, vous visualisez les deux 
effets, avec et sans transparence. 
Remarquez au passage l'effet obtenu en 
superposant un ‘’O'’ et un slash (‘‘/'’). 


Le Piège 


La grande gaffe classique consiste à 
oublier d'annuler la transparence sitôt 
que l'on n'en a plus besoin (remarquez 
notre PRINT TO$ en bout de la ligne 
110). Sans cela, la transparence restera 
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active, même si vous quittez votre pro- 
gramme. Essayez donc de modifier une 
ligne avec la touche COPY sous trans- 
parence, et vous verrez le désastre à 
l'écran Un horrible gribouillis absolu- 
ment illisible !° 


TAG ET TAGOFF 
(Lignes 200 à 340) 


Lorsque l'on écrit une chaîne par 
LOCATE, on est limité à 25 positions ver- 
ticales et 40 positions horizontales 
(MODE 1), bien fixes. Avec TAG, on 
peut commencer l'écriture absolument 
n'importe où, le départ étant le curseur 
graphique, fixé par exemple par PLOT 
523,129,1. Ce troisième paramètre est 
la couleur de ce qui va être écrit par 
PRINT ; un PRINT sous TAG oublie tota- 
lement le PEN en cours ! 

Très important : le point curseur graphi- 
que se trouve en haut à gauche du 
‘’pavé carré’’ du premier caractère de la 
chaîne. Après ce PRINT sous TAG, le 
curseur graphique se trouve alors en haut 
à gauche du pavé qui suit le dernier 
caractère de la chaîne. Un exemple : 


PLOT 423,129,3:TAG:PRINT 
‘’AMSTRAD"";:TAGOFF 


Le curseur graphique se trouve en final 
en haut à droite du ‘’D'’ d'AMSTRAD 
(écrit en rouge). La preuve, faisons sui- 
vre par PRINT XPOS;YPOS — réponse : 
535 129. TAGOFF est bien sûr l’annu- 
lation de TAG, à mettre tout de suite 
après usage, sinon vous ne pourrez plus 
écrire par des PRINT normaux, même 
avec un LOCATE ! 


Super-important : Mettez toujours un 
point-virgule à la suite de la chaîne à 
écrire sous AG, sinon, à la suite du mot, 


vous aurez droit à deux caractères gra- 
phiques assez bizarres : une flèche cou- 
dée qui est le symbole de ‘’CR’’ (Carriage 
Return) ou CHR$(13), suivie d’une flè- 
che vers le bas, symbole de ‘’LF'’ (Line 
Feed) ou CHR$(10). 


Après ces préambules, revenons à notre 
programme de démonstration. 

On le met à la fois en transparence et en 
TAG pour afficher notre ligne de 25 ‘0, 
en jaune {lignes 210 à 220). TAGOFF, 
et par LOCATE banal cette même chaîne 
en rouge {ligne 240). On constate que 
la transparence joue et que ces ‘’O'’ rou- 
ges s'entrelacent avec les ‘‘O'’ jaunes. 
Retour en TAG, on descend le curseur 
graphique et on affiche “Il” (lignes 
250-260). Oh, surprise ! Ces ‘‘l’’ ont 
effacé en partie nos ‘‘O’’ rouges. Véri- 
fions que la transparence n'est pas annu- 
lée, ligne 270, après un TAGOFF, affi- 
chons quatre ‘’O’’ bleus sur nos ‘0’ 
rouges, mais par un LOCATE banat : la 
transparence est toujours active. Conclu- 
sion : la transparence est inactive avec 
un PRINT sous TAG. 


TAG APRES UN DRAW 
(Lignes 400 à 490) 


Nous allons entrecroiser des traits verti- 
caux fins (par DRAW) et des barres hori- 
zontales (P$), avec ou sans transpa- 
rence. En bout, on marque ‘‘T1'’ ou 
“"TO'" (=avec ou sans transparence). 
Dans l'ordre, on fait : 

— une barre TO ; 

— un trait bleu TO : le trait apparaît sur 
la barre, le TO du trait rogne la barre ; nor- 
mal ; 

— une barre T1 : elle ‘recouvre’ le trait 
bleu ; 

— un trait rouge T1 : trace sur les deux 


barres ; le ‘’T1’’ rogne la barre (pas de 
transparence en TAG) ; 

— un second trait rouge T1 mais plus 
court, le ‘’T1'’ est recentré par un 
MOVER |ligne-440) ; 

— deux secondes de pause (ligne 450) ; 
— une barre TO ; 

— une barre T1 : toutes deux recouvrent 
les trois traits ; 

— en bas d'écran, une chaîne en trans- 
parence ‘‘transparence ou non, le dernier 
recouvre'” (c’est la conclusion) : carac- 
tères et traits font bon ménage ; 

— plus bas encore, un message sans 
transparence ‘‘tapez une touche’ : un 
trait est localement effacé. 

Expliquons le MOVER -— 16,18 de la ligne 
440 : nous avons dit que chaque carac- 
tère fait 16 x 16 points graphiques en 
MODE 1 (32x16 en MODE 0,8x16en 
MODE 2), et nous voulons centrer les 
deux caractères de ‘‘T1’’ au-dessus du 
trait. 

Il faut donc déplacer le curseur de 16 
points à gauche (—16) et le remonter 
d'au moins 16, plus deux de séparation, 
d'où un MOVER -16,18. Un PLOTR 
— 16,18 aurait eu le même effet. 
Rappels : Le R final de DRAWR, PLOTR, 
MOVER signifie ‘’RELATIF'’. La diffé- 
rence entre PLOTR et MOVER est que 
PLOTR trace le point, tandis que MOVER 
se contente de déplacer le curseur sans 
le marquer à l'écran. Pour un PRINT sous 
TAG, c'est sans importance puisque si 
le point est marqué, il sera aussitôt 
effacé par le ‘’pavé’’ du premier carac- 
tère. 


L'ECRITURE NON LINEAIRE 
(Lignes 500 à 590) 


Nous allons écrire une chaîne en demi- 
cercle ! Le principe est simple : on va 
faire des PLOT sur un demi cercle, et en 
TAG, on y affiche les caractères de la 
phrase, les uns après les autres. 

On va même faire mieux : on change de 
couleur à chaque lettre (1, 2, 3, 1,2, 3, 
etc.). L'effet est assez spectaculaire. 
Par défaut, l’'ORIGIN graphique est située 
en 0,0 (coin en bas à gauche). En ligne 
510, on la met à mi-largeur en la remon- 
tant un peu. 

Le tracé va se faire selon un angle variant 
de 180 à O degrés, mais nos PLOT vont 
aller de 1 72 à 5° caril faut tenir compte 
de la hauteur de la première et de la der- 
nière lettre. 

Ligne 534, on calcule l'angle DA entre 


10 TRANSPARENCE, TAG, INVERSION ViDEU 
20 AMSTRAD CPC Michel &RCHAMESAULT #86 


30 MODE 1:CLS 
40 T1$=CHRS (22 +CHRE (1) 
SG TO$=CHRS LIT) +CHRS# (0) 
60 AF=STRINGS (25, “D") 
70 CH=ETRINGE (5, "+") 

80 L£=STRINGS IS," _") 

90 FS=CTRINGE (25, 145) 


196 LOCATE S,Z:FRINT “SUFERFOSITION avec 


deux caractères. Dans une boucle FOR 
NEXT, on pointe le PLOT de couleur E : 
sous TAG, on prélève le caractère sui- 
vant dans la chaîne à écrire {ligne 560), 
en incrémentant E de +1 et en le limi- 
tant entre 1 et 3. 

En fin de tracé, on n'oublie pas en ligne 
580 de tout remettre en ordre (pensez- 
y !). 

Nous avons pris le cas du demi-cercle, 
maïs la même technique par TAG.est 
applicable pour écrire en diagonale, en 
ligne brisée ou horizontalement (ou ver- 
ticalement), mais avec un intervalle inha- 
bituel entre chaque lettre. 


MOT EN EVIDENCE 
(Lignes 600 à 690) 


Pour attirer l'attention sur un mot à 
l'écran, les méthodes ne manquent pas ! 
La plus simple est la transition minuscu- 
les/mäjuscules, mais on peut aussi chan- 
ger de PEN (ligne 620), fabriquer un PEN 
clignotant (ligne 630). Ici, c'est INK2 qui 
alterne entre mauve et vert vif. On ralen- 
tit la vitesse d'origine par SPEED INK 
15,15, c'est-à-dire durée mauve = 15, 
durée vert = 15 (en 1/50° de seconde). 
Essayez aussi : 


630 INK 2,24,1:SPEED INK 15,10 


C'est une alternance jaune (=PEN1), 
marine (=PAPER), plus long en jaune 
qu'en bleu. 

L'inversion vidéo (=échange PAPER/ 
PEN) s'obtient par PRINT CHRS$(24), 
appelons cette longueur IV$ (ligne 610). 
La ligne 650 est alors facile à écrire. 

On peut combiner l'inversion vidéo avec 
le flashing (ligne 660) : seul le fond cli- 
gnote. 

Enfin, on peut changer simultanément 
PAPER et PEN (ligne 670). 

Des questions de (bon) goût, et d'origi- 
nalité… 

L'inversion vidéo se met et s’annule par 
CHR$ (24). 


MENUS DESCENDANTS 
(Lignes 700 à 820) 


C'est une application de l'inversion 
vidéo, où vous allez retrouver une cer- 
taine présentation de menus propres à 
des logiciels de qualité. Les différentes 
options sont présentées, mais une seule 
est en inversion vidéo. Une action sur la 


TRANSPARENCE 
110 HES:FRINT T1#:GO0SUB 2000:FPRINT Tog 


barre d'espacement, et c’est la ligne au- 
dessous qui est en inversion. Une action 
sur ENTER et cette option est exécutée. 
C'est une question d'’incrémentation ver- 
ticale. À chaque descente, l'option pré- 
cédente est ré-écrite sans inversion. En 
bas de liste, on repart sur la ligne du 
haut. Spectaculaire et pas sorcier. 


MENUS DEROULANTS 
(Lignes 900 à 1030) 


Variante de ce qui précède Cette 
méthode est utilisée lorsque l’on manque 
de place à l'écran. Dans une fenêtre 
(WINDOW # 1) étroite, ici trois lignes, on 
fait défiler un menu ‘‘déroulant'’ (sans 
fin). La ligne du milieu est en inversion 
vidéo, elle est donc fixe. À chaque pres- 
sion sur une touche, les options défilent 
une à une. ENTER fait exécuter l'option 
en inversion vidéo. Le CHR$(18) de la 
ligne 910 efface ce qui est à droite du 
curseur. 

La ‘nervosité’ de ces deux menus 
étonne lorsque l’on sait que c’est pour- 
tant du 100 % Basic. 


NOTE SUR WINDOW : Lorsque l'on crée 
un WINDOW, il faut d’abord y faire un 
CLS# (ligne 910). La ligne 1020 efface 
WINDOW # 1. 


FAISONS LE BILAN 


Au cours de ces petits programmes de 
démonstration, l’auteur en a profité pour 
illustrer des fonctions Basic de l’'AMS- 
TRAD que certains d'entre vous ne 
connaissent ‘’que de nom’”, voire pas du 
tout. Nous en faisons la liste, suivie du 
numéro de ligne où elles apparaissent : 
CHR$(22)(40), STRING$(60,90), CALL 
&BB06(140), TAG(210), TAGOFF(230), 
PLOTR(250), DRAWR(420), MOVER 
(440), DEG(510), ORIGIN(510), 
CHR$(24)(610), SPEED INK(630), 
WHILE/WEND(770), ON... GOTO(820), 
WINDOW(910), CHR1(18)(910). 

Il est toujours profitable d'enrichir son 
vocabulaire. 


120 LOCATE 10,12:FRINT “idem . SANS Tran 


parence :" 


1206 H=15:GOSUE Zoûi 


140 LOCATE i 


... "2: CAEL 


FT NE. 


3,25:FRINT “Tapez une 
ZBEGES 


39 


210 CLS: PRINT Ti$: TAG 

220 FLOT 56,290, 1:PRINT ÀÂ#: 

236 TAGOFF , 

240 FEN S:LOCATE 7,2:FRINT AS 

250 TAG:FLOTR 0,-14,2 

260 FRINT "IIII"3;:TAGOFF 

270 FEN 2:LOCATE 1,1:PRINT "0000" 

280 PRINT TO$:FEN 1 

290 FEN 1:LOCATE 13,10:PRINT "PLACE FAR 
TAG" | 

3200 FEN S:LOCATE 13,12:FRINT "FLACE FAR 
LOCATE" + 

310 FEN 2:LOCATE 13,14:PRINT MIIII FAR T 

AG" 

320 LOCATE 1%,16:FRINT "0000 FAR LOCATE" 

330 PEN 1:LOCATE 4,19:FRINT "DONC EN TAG 
,s FAS DE TRANSPARENCE" 

340 LOCATE 13,25:FRINT "Tapez une Touche 
.…."!:CALL SEBC6 

HOT NS EST SERRE ER ESS Re Reese 

400 ‘ AVEC LES LIGNES 

410 CLS:LOCATE SSI PRINT F$;" TG" 

420 FLOT 50,0,2:DRAUR 0,275: TAG: FRINT MT 

Gas TAGOFF 

450 PRINT TI: LOCATE JF: PRINT Fit Ti" 

TAG 

is FPLOT Lu, u, i DRAWR 0,3 FSsFRINT STI" 
:FLOT 290,0: DRAUR 0,247: MOVER -16,18:FRI 

HT "TI "5: TAGOFF 

456 FOR Ii T[ ZOOGINEXT 

4ëi LOCATE ZS,{HI:PRINT Fi" TIM PRINT TO 

47% LOCATE S,IS:FRINT FPS" TOMPFRINT T4 

480 LULATE 1,20: FRINT"Transparence ou no 

n,le dernier recouvre, "PRINT TO 

AS LOCATE 1%, 24: PRINT "Tapez une Touche 
...":CALL &EBGS 

1296 PS ns nn ce ne Cu D ous one ee ES D eue 2 cl 2 2 1 lan Des ut a 

300 © ECRITURE CIRCULAIRE F8R TAG 

JO CLS: DEG: ORIGIN ZAC, Gas TAG: le lsEsi 

SO TESMECRITURE CIRCULAIRE FAR TG" 

Ji DAsi7Z/LENCTE) 

240 FÜR 4=172 TD S STEF -Dé 

Soi PLOT COS is #5o, SINiAi#I0Q,E 

dû PRINT MID#(CT#,1,113:1=1+i1:ESE+1: IF E 

#4 THEN Es! 

470 NEXT 

580 ORIGIN 0,0: TAGOFF:FEN 1 

390 LOCATE 13,2S:PRINT "Tapez une louche 

. ":CALL RBECé 

5909 Lou ane dès ae cote one ces von dm cs cn, 200 008 ame di es me Sas ent Lu ed eut sun 20 ed en aies vous aies 

600 © MOTS IMPORTANTS 

&10 CLÉ: IVE=CHRSE (24) : LOCATÉE SZ: FRINT "E 

our attirer L'ATTENTION gur un mot: 

620 LOCATE 2,9:PRINT “On peut changer {la 
"ss PEN S:FRINT"'couleur "5: PEN 1:FRINT"d 

u mot." 

&IO INE S,8,18:SFPEELD INF 15,15 

640 LOCATE 10,12:FRINT'"'le mettre en "s:F 

EN ZeFRINT "Flash.":FEN Ï | 


En 
Û 


40 


850 LOCATE 19,1S8:PRINT "utiliser l'"s1V# 
j'inversion"s;IV$;" video." 
ëbQ LOCATE 10,18:FEN Z: PRINT 144835 "combin 
er'sIVS#s: PEN 1e PRINT " flash et inversio 
n. LL 
970 LOCATE 10,21:FRINT “combiner "ss FPAFER 
DiPEN SPRINT ° pen "siFEN LiFRINT "et 
paper, !":FAFER 0 
880 LOCATE 13,25:FRINT "Tapez.une Touche 
...":CALL 8&EB0é | 
690 INF 2,20:SPEEL INE 16,10 
69% Peas si 
700 * MENUS DESCENDANTS 
710 DATA "Superposition de Lettres","Ef+ 
et de TAG'","Lignes et TAG" 
720 DATA "Ecriture circulaire",'"Mots en 
Evidence",Quitter 
720 RESTORE 710:FO0R Ii TO 6:READ x#ili: 
NEXT:H=l: CLS 
740 FEN Z:LOCATE 13,2:FRINT "MENU DESCEN 
DANT':FEN 2:LOCATE 7,24: PRINT "Choix par 
SFACE puis ENTER":FEN 1 
750 FOR I=1 TO £&:LOCATE 10,5S+14Z:FRINT X 
SCI): NEXT 
780 LOCATE 9,5+MH#2: PRINT IV#i" MSC" 
"a lv 
770 RE=UMIUHILE R&= "Ms RE=INEEYS: WEND 
760 IF R£=CHR# (IT) THEN 640 
790 V=H:H=H+i: IF H=7 THEN H=i 
BGo LOCATE 9,5+V4%:FRINT "M OMS xg(Vi st" 
510 GDTO 760 
B2G ON H GOTD 10,200,400,500, 600,900 
DODN  RSSER Een 
ÊTES MENU DÉROULANT 
910 CLS:WINDOW #1,6,27,11,12:EAPERKI,Z2:F 
EN#1,0:CLSH#i:H=6:E#S=CHRS$ (18) 
926 LOCATE 15,23:FRINT "MENU DÉROULANT" 
935 IF H=7 THEN H=i 
GAS LOCATE #1,3,1:FRINT #1,XHCHI5ES 
950 CEH+i:IF C=7 THEN Cai 
Gé0 LOCATE #1,2,2:FPRINT #1,14V#s" "sx (D) 
3" MsIVEIES 
970 D=C+i:IF D=7 THEN D=i 
360 LOCATE #1,5,3:PRINT #1,4S8 (CL) 3ES 
990 REZUISUWAILE REZ RESINÉEYSE: WEND 
1000 IF RESSCHRSE (1Z) THEN H=H+i: GOTO 955 
1010 ON C GÜTD 10,206,460, 500, LOGO, 100 
1020 WINOOWK#O, 1,40,1,253:CLS 
1030 END 
1999 À ue eat ms cn ue ds es clan is du Gén dal te 22e te 6 dns dos aan ous Ds moin cé out eu one Des D 02 en 
2000  SUFERFOSITION DE CARACTERES 
à LOCATE 9,H:FRINT À# 
10 LOCATE 11,H:FRINT M/U: PEN 3 
ÿ LÜOCATE LESHIFRINT Cé 
2040 LOCATE 23,H:PRINT L#:PEN 1 
30 LOCATE 9,H+S:FRINT F# 
1 LOCATE I1S,H+2:PEN G:PFRINT C$:FEN 1 
? RETURN 
DRE FIN DE LISTING -------- 


ms com come o00e mon 00e me me me ie me née vom ce ous me one done me con von one me 1000 pu oui ma one 


2,rue Marc Sangnier 
94240 - L'HAY-LES-ROSES 
Tél. : 46.83.03.61 


Prix fin d'année, nous consulter pour la gamme CPC et PCW. Ces prix ne seront pas 
communiqués par téléphone. 


RESERVEZ-MOI DES MAINTENANT 


13, bd de la République 
92250 LA GARENNE COLOMBES 


Tél. 47.84.21.77 


: ge ET mme 
Déduisez 10 % pour tout achat de logiciels. Offre valable jusqu'au 31 décembre 1986. , 

CONTAMINATION 140 00 F Lo d 

INFERNAL RUNNER 160 00 F 
BBLOGICIELS SUR CASSETTE THEATRE EUROPE 140 00 F CESEANES Fe “ : MATHS SECOND CYCLE 290 00 F 
MACADAM BUMPER 14000 F | SOULDEN DASH DOUÉ À PLANETE BASE 150.00 € [A ÉOUATIORS MINE ET 
PANZADROME 129 00 F CHUCKIE EGG 2 129 00 F SOLDE MILLION ? 139 00 F FOCÉ ER BASE SOS ONE 
BATMAN 129 00 F WAY OF THE TIGER 129 00 F TURBO ESPRIT 129 00 F DAS GENIUS NT 
SAMANTHA FOX 120 00 F LE SECRET DU TOMBEAU 200,00 F PRINTER PACK 2 920 00 F 
ORDIDACTIC 229 00 F BBLOGICIELS ‘SUR DISQUETTERS COMMANDO 129 00 F ne PAIN 
CARTE D'EUROPE 200 00 F : 0 STRIKE FORCE HARRIER 175 00 F RO RES SPUATEUR San OU 
DAMBUSTER 139 00 F BRIDGE (français) 300,00 F IKARY WARRIORS 169,00 F C-DiSC je j 940 00 F 
BOMB JACK 129 00 F SA COMEAT ne ge F THEATRE EUROPE 220 00 F ID U SOU UO 
PACIFIC 140 00 F À POUVOIR 200 00 F ñ 
BLADE RUNNER 12000F | LEPACTE JEUX) 22000F | RALLYEN 200 00 F NEA ESS TE 
GOLIATH 139 00 F REVERS! CHAMPION 200 00 F SPITFIRE 40 180 00 F HERCULE 280.00 F 
COMPUTER HITS (10 JEUX) 160 00 F GEOGRAPHIE 200 00 F HIGHWAY ENCOUNTER 2 180 00 ZEDIS 11 159 08 F 
L'AIGLE D'OR 180 00 F L'ANIMALIER 180 00 F WAY OF THE TIGER 165 00 F 
BOULDER DASH II 140 00 F RODEO 18000F | SOLDMHLION 1 180 00 F MASTERFILE Il pour 6128 45000 
MERCENAIRE 123 00 F FRANCE GEO 180 00 F CONTAMINATION 220 00 F P , 
STRIKE FORCE HARRIER 129 00 F 2 TH. EIDOLON 168,00 F PACIFIC 220 00 F 
GREEN BERET 129 00 F ELITE VER FRANÇAISE 270 00 F DRUID 155,00 F BMATERIEL ET PERIPHERIQUESB 
STEEREET HAWK 123,00 F CAULDRON **11** 185 00 F PING PONG 180 00 F AMSTRAD CPC 464 2690-06 F 
GHOSTS' N GOBLINS 129 00 F NEXUS 190 00 F TAU CETI(ED SPECIALE) 180 00 F AMSTRAD CPC 464 3999-00 7 
SAPIENS 140,00 F MISSION ELEVATOR 185 00 F TOMAHAWK 180 00 F AMSTRAD CPC 6128 
GHOLD HITS (4 JEUX) 139 00 F NEXOR 190 00 F BOMB JACK 180 00 F AMSTRAD CPC 6128 5290-6007 
ELECTRIC WONDERLAND 99 00 F PACK JIL 195,00 F ATTENTAT 200 00 F DISQUETTES 3 POUCES 80 00 FPCW 
CASSETTE DE 50 JEUX 192 00 F SAPIENS 180.00 F L AIGLE D OR 220 00 F DISCUETTES 3 POUCES CF - 20D POUR LE 2° 
CAULDRON |! 120 00 F TENSION 200,00 F BATMAN 180 00 F LECTEUR PCW 8256/8512 
SAI COMBAT 99 00 F ONE 279,00 F COMMANDO 180 00 F LECTEUR 5 POUCES 1/4 2499 00 F CPC 
REVERSI CHAMPION 150 00 F WIZARDS LAIR 169 00 F TANK COMMANDER 175 00 F LECTEUR 5 POUCES 1/4 VORTEX OFFRANT 
XENON 110,00 F GRAND PRIX 500 CC 180,00 F STARQUAKE 170 00 F L'ACCES DIRECT ET 708 Ko UTILISATEUR SOUS 
ROOM TEN 110 00 F THEY SOLD MILLION 180 00 F L HERITAGE 220 00 F CPM ET AMSDOS 
BIGGLES 139 00 F TRIVIA 169 00 F LECTEUR 5 POUCES 1/4P.E.F.2289 00 F CPC 

2 TEUR 5 P 1/4 AVEC INVER 
RNRU MASTER 120 00 Ë KARQ Éd er 160.00 F BLOGICIELS PROFESSIONNELSE PISTE 0! FOURNI AVEC UNE ALIMENT 
STARSTRIK IL 139 00 F HIGHWAY ENCOUNTER 169 00 F ET UTILITAIRES TION DIGNE DE CE NOM FUSIBLE ET CABLES 
) Fu 
DESERT FOX 130 00 F BATAILLE D ANGLETERRE 220 00 F FACTURATION STANDARD DO 00 LECTEUR 1 Mo 1990 00 FPCW 
MISSION ELEVATOR 139 00 F FIGHTER PILOT 169 00 F ACT CRISE PE DETAT DO LECTEUR SUPPLEMENTAIRE POUR PCW 8256 
TN our | MeReSoe Aide | Gun OU | abord mire 
CAULDRON 120 00 F TRIPLE PACK (3 JEUX 190 00 F FAR GESTION TOUR 1720 00€ LECTEUR DE DISQUETTES AVEC CONTROLEUR 
GRAND PRIX 500 CC 150007 | LIGHTFORCE 165.006; |: M AENDAD SOLS 128 F0 00 | COMPRENANT LE SYSTEME AMSDOS ET CPM 2 
REACTIVATOR 120,00 F LE RESQUILLEUR 60 00 F DB COMPILER . 790 00 F DRIVE FD1 2° LEC 1690 00 F CPC 
SULD MI j EU KUNG IN LAS 129 00 L'EXPERT CPC 6128 & PCW 790 00 F À 2e UNITE DE DISQUETTES DOUBLEZ LA CAPA 
GYROSCOPE 120 00 F REURTRE/L ATLANTIOI 200007 | lECTOMAT 450007 À GiTE DE STOCKAGE SUR DISQUETTE POUR 
SPITFIRE 40 129 006 | BACTRON 180.00 ! DTAMAT DOOCE | 464+DDit - 664 - 6128 
ORTHOGUS (6 CASSETTES) 760 00 F | TORNADO LOW LEVEL F6 00e | lURBOPASCAI PAT00 EL EPSON LX-80 2990 00 F CPC 
30 GRAND PRIX 129 00 F MARACAIBO 180:00:F. |" LURBOTUTOR 474.00 F L'EPSON LX-80 EST L'IMPRIMANTE LA PLUS 
AFFAIRE SYDNEY 160,00 F | ORTHOGUS 825 00 F COMPTABILITE GENERALE 1640 00 F VENDUE POUR LES CPC. TOUS LES LOGICIELS 
SOLD À MILLION 1 160.00 F | WHODARES Wins 1 180 00 F DE ANA 128000 € À ASSURENT LA COMPATIBILITE GRAPHIQUE ET 
3D CHESS (CYRUS 11) 139 OÙ F 3D CHESS (CYRUS 11) 159 00 F FICH ET CALC/PCW 950 00 F TEXTE 
REVISION MATHS NIV BAC 340 00 F EDEN BLUES 220 00 F TURBO PASCAL SUR PCW 731 00 F EXTENTION SP 128 Ko 786 00 F CPC 
BACIRON 15000€ | M6" 180007 | AC! (PCM) 81000F | SEURS DE L AMSTRAD 484 DÉSIRANT UTILISER 
GALVAN 128.00 F | INFERNAL RUNNER MOQUE DEVISES CPUATIONS RENE RE DES LOGICIELS ‘PROS EX MULTIPLAN 
SPIRIT TRANS CAS DISC 12500 F L'AFFAIRE VERA CRUZ 250 00 F MULTIPLAN PCW/CPC 6128 298 00 F DBASE Il 
CRAFTON & XUNK 140 00 F SORCERY + 169 00 F ) BASE 11 PCW/CPC 6128 790 F ER TEN ON UELINOE DE ee Re 
FUME SIUEQ | | U 

JAMES DEBUG. | 180.00 F GALWAN Les 200007 | GÉNÉRATEUR D'APPLICATION >soooe | SPA ; 
RAMBO 139 00 F GREEN BERET 169 00 F LErE + RU ne sa EXTENTION sP s12ko vesl 00 FCPC 
FIGHTING WARRIOR 1 F ZOMBI 175 00 F SE II INITIATI 5) EXTENTION MEMOIRE DE 512 Ko VORTEX POUR 
DUNDARACH 129004 | LES 4 SAISONS 22000 F | SPACE MOVING CPC 395 00 F | CPC 464 
MOMIE BLUES 150,00 F EQUINOX 179 00 F POCKET WORDSTAR CPC PCW 890 O0F EXTENTION SP 64 Ko 627 00 F CPC 
MICRO GEO 139 00 F SABOTEUR 169 00 F LASER COMPLILEUR 280 00 F EXTENTION MEMOIRE DE 64 Ko VORTEX POUR 
LIGHT FORCE 130,00 F ERE DU VERSEAU 250 00 F LASER BASIC 280 00 F CPC 464 
MEURTRE/L ATLANTIQUE 220 00 F MACADAM BUMPER 240 00 F DISCOLOGY 375,00 F GRAPHPAD 1125 00 F CPC 
LES PORTES DU DESTIN 129 00 F TOBRUK 190,00 F MINITELEC - émulateur couleur TABLETTE GRAPHIQUE QUI VA VOUS DONNER 
SPELLBOUND 59 00 F SRAM 189 00 F par modem Digitelec 280,00 F LA PLUS GRANDE SATISFACTION POUR METTRE 
PING PONG 120 00 F BALADE PAYS DE BIG BEN 200 00 F TRANSMITELEC 225.00 F EN APPLICATION VOS DONS DE GRAPHISTE 

Emettez vos fichiers par modem Digitelec 

Envoi BON A DECOUPER CPC! 
ÆXPRESST 


Désignation 


Quantité 


(Logiciels) Frais de port 30 F. 
(Matériel) Frais de port 70 F. 


TOTAL TTC 


LIBELLEZ VOS CHEQUES 
A L'ORDRE DE MOVE 


'DOKE 
DE pe LIFE 
SAS IDOÉE, &154,%4060:° NOUVELLE ADRESSE 
GE L'IMAG 
IDOEE, 4157,84000: "7 LONGUEUR DU FICHI 
+ [IMAGE 


S#COGG: ANCIENNE ADRESS 


Eric WANNIN 


Ce court programme fonctionnant sur la 
gamme CPC (464, 664, 6128) permet de 
démontrer qu'il est possible de réaliser 
certains effets spéciaux lors de l'affi- 
chage d'images à l'écran. 

Avant tout, il est nécessaire d'effectuer 
un RESET de l'ordinateur (après sauve- 
garde bien entendu). 

Le programme demande alors le mode 
d'affichage sous lequel l'image a été 
créée. Ensuite, entrez le nom de l'image, 
sans le suffixe .BIN. 

Le programme s'occupe alors de charger 
celle-ci et de la transformer en &4000. 
Il suffit de presser une touche pour que 
l'image s'affiche enfin derrière des 
vagues de points. 

Les couleurs de l'image peuvent être à 
tout moment redéfinies én ligne 670, 
680 et 690. Vous pourrez sans peine 
inclure dans vos propres programmes 
cette routine qui affichera de manière ori- 
ginale vos écrans de présentation. 


MODE Z:INE O,26:INE 1,0:PAFER 0:FEN 
1:BORDER 24 
480 PRINT"#4# VIDEO EFFECT 1 #44": PRINT 
INFUT'MODE DE L'IMAGE À AFFICHER (0, 
":HOS 

F MOg="" THEN 470 

ASC (HOS) 48 OR ASC (MO#):50 THEN 4 


LOCATE 1,5 
INPUTUNOH DCE L'IMAGE À CHARGER “3: HOM 


L(NOMEi<1 OR LENINOMS):S THEN L 
PRINT SPACES (850): GOTO 550 


: MODEM A +1 
» OH HOD4 GOTO S8C 


T5 &20 
MA D A ARE DE RO EEE TG Z BP 
EFFETS * TÜ 
ERIC WANNIN + 
FYRIGHT 1986 * , 8CO00: CHARGE L'IMAGE À L 
et L'AUT A 
CALL 8150: ° RELOGE L'IMAGE EN 


ON MO%X GOTO 670,4B0,469û 

INF GG: IE 1,26 :GOTO 700 

INE CGI INE 1,261INE Z,6:1INE 2,13: 60 
FM 
SPC INE GOLINE 1,262INE Zi INE SES INE 
SASINE S,6:INE 6,8: INK 7,10: INF G,izsl 
NE OS, 1A4i IN 10,16: INF 11,189: INE 12, #0: 7H 
FE 13 INF 14,24: INF 15,15 


Lei 


700 LOCATE 1,25: FRINT"PRESSEZ UNE TOUCHE 


CALL £EBEGÉé 


LL &Bo0o: AFFICHE L'IMAGE AY 
EC qe 

745 CALL &BEGS 

F5ù END@ 


Vous avez un AMSTRAD, 
Vous avez un MINITEL, 


biere. 


avec LE LOGICIEL JMN SÉRIE version 2* 
et son CÂBLE SPÉCIAL DE RACCORDEMENT, pour : 


1 — ENREGISTRER, IMPRIMER et ARCHIVER toutes les informations accessibles par minitel, quelles que soient leurs sources. 

2 — Rechercher un fournisseur, ou de nouveaux clients, en ÉDITANT VOS ÉTIQUETTES-ADRESSES DIRECTEMENT A PARTIR 

DE L'ANNUAIRE ÉLECTRONIQUE. ; 

3 — RÉDUIRE VOS TEMPS, donc vos COÛTS DE CONSULTATIONS : Sitôt affiché, un écran minitel est enregistré ! (Quelle économie 

quand vous consultez le 36.15 ou des Banques de Données Professionnelles…). 

4 — COMMUNIQUER avec un AMSTRAD distant par le RÉSEAU TÉLÉPHONIQUE, sans modem spécialisé : échanges de fichiers, 

de programmes, de courriers. (à une vitesse nominale de 120 caractères par seconde dans les 2 sens). 

5 — Transformer tout fichier reçu en code VIDEOTEX en fichier ASCII, compatible avec vos autres logiciels standards : locoscript, DBase... 
(Ce logiciel nécessite une interface Série d'Amstrad). 

* Le logiciel I]MN SÉRIE, recensé dans le RÉPERTOIRE DES PÉRIPHÉRIQUES pour MINITEL, édité en avril 1986 par ADMINISTRATION 
DES TÉLÉCOMMUNICATIONS, est disponible dans sa version 2 pour AMSTRAD. Une version compatible PC (pour AMSTRAD 
PC 1512), permet en plus des autres fonctions l'enregistrement automatique de l'annuaire électronique, avec recherche automatique des 
codes postaux (nous consulter). 


avec LE LOGICIEL JMN SERVEUR monovoie version 2** 
et son CÂBLE SPÉCIAL DE RACCORDEMENT, pour : 
1 — CRÉER votre APPLICATION SERVEUR : 8 couleurs, 4 tailles de caractères, graphisme plein ou mosaïque, soulignement, 
clignotement, inversion, enchaînements, mots de passe... 
2 — TRANSFORMER VOTRE AMSTRAD EN SERVEUR (nécessite l'adjonction d'un modem) pour : 
— Mettre en place un journal cyclique (informations diffusées sur un lieu public, messages publicitaires.) 
— Gérer une messagerie complète avec mots de passe individualisés. 
— Diffuser des informations à vos correspondants habituels (syndicats d'initiative, clubs, associations, fournisseurs...) 
— Enregistrer des messages, des réservations, des commandes, ou même créer votre propre répondeur télématique individuel... 
— Permettre la consultation à distance de vos fichiers standard et Bases de Données créés avec DBase ou JETSAM, ou de textes de 
toutes longueurs créés avec LOCOSCRIPT ou WORDSTAR... 
** La version 2 du logiciel JMN SERVEUR sera disponible fin 86. 


OT.B. Département JMN DIFFUSION, 2, rue de la Bourse, 69001 LYON - B.P. 1191 - 69203 LYON CEDEX 01 - Tél. : 78.27.97.90 
- 


/ BON de COMMANDE à retourner à : O.T.B. B.P. 1191 - 69203 LYON Cedex 01 SRE 


Pour votre AMSTRAD CPC ou PCW : 
Logiciel JMN SÉRIE version CP/M 700 F TTC 
Logiciel JMN SERVEUR version CP/M 1.500 F TTC 


Pour votre AMSTRAD PC 1512 : nous consulter 
NOM 


Adresse 


Code Postal 
Paiement : à la commande Signature 


(En cas de règlement joint à la commande, OT.B. prend à sa charge les frais de port). 


CRAZY V 3.0 


Pascal BELLONCLE 


ous êtes curieux de nature, vous voulez savoir ce qu’une dis- 

quette a dans le ventre ? 

Mais cette disquette est ‘’protégée’’, son formatage est dif- 
férent, les secteurs ne sont pas standards, ont une longueur diffé- 
rente de 512 octets. 

Ce programme est ce qu'il vous faut. Il va enfin vous permettre d’ar- 
river à vos fins. 


En effet ce programme dialogue avec le 
contrôleur de disquette, il le programme 
directement et affiche ses registres. Ainsi 
tout devient possible, dans les limites 
permises par celui-ci, bien sûr. Bien que 
certaines manipulations ‘pas très ortho- 
doxes'' permettent bien des choses 
amusantes. 


LA DISQUETTE 

Il faut rappeler que sur la disquette, les 
informations sont réparties en pistes 
concentriques (il y en a 40 sur chaque 
face) et que chaque piste est subdivisée 
en secteurs (théoriquement 9). 


LE CONTROLEUR 

Par exemple, sur l'APPLE II, qui ne pos- 
sède pas de contrôleur digne de ce nom, 
les programmeurs ont des tas de problè- 
mes de synchronisation, de parité, de 
checksums, de localisation des 
données. 

Tandis que le contrôleur s'occupe de 
tout. Il suffit de lui indiquer le secteur 
désiré et il:effectuera toutes ces tâches 
ingrates tout seul. 

Le circuit utilisé est le DP 765 A de 
NEC. Ce circuit équipe des machines 
comme l'ORIC ou même les IBM PC... eh 
oui | 

Ce circuit est très convivial, c'est pour- 
quoi on convient de distinguer 3 phases 
dans sa programmation : 

Phase instruction : c'est là qu'on lui indi- 
que ce qu'il doit faire. Par exemple se 
positionner en telle piste, lire tel secteur. 
Phase exécution : le FDC (Floppy Disk 
Controler) fait ce qu'on lui dit. 

Phase résultat : le FDC dit comment 
s'est passée la phase précédente. 


LES INSTRUCTIONS 

Je ne vais pas passer en revue toutes les 
instructions du FDC, mais pour ceux qui 
seraient intéressés, je leur conseille vive- 
ment de se reporter au ‘Livre du lecteur 
de disquette AMSTRAD" chez Micro- 
Application (n°10). Toutefois, il me sem- 
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ble nécessaire d'en examiner quelques 
unes, celles qui sont utilisées dans le 
programme : 

‘Chercher piste'’ : sans commentaires 
‘’Aller en piste 0'” : idem 

‘lire secteur'’ : le FDC a besoin de 7 
informations 

— le numéro de piste ; 

— l'adresse de tête (0 = face A) ; 

— le numéro du secteur ; 

— la taille du secteur (sa longueur divi- 
sée par 256 ; 2 pour 512 par exemple) ; 
— le numéro du dernier secteur de la 
piste (généralement on indique celui du 
secteur voulu à cause d'un compromis 
au niveau du matériel) ; 

— GAP #3 (c'est le nombre d'octets qui 
séparent les secteurs. Cela évite de réé- 
crire sur le secteur suivant, on ne sait 
jamais, imaginez que le moteur tourne 
plus vite...) ; 

— OFFh (255) est généralement le der- 
nier paramètre. Théoriquement il a une 
signification si la longueur fournie est 
nulle. (| semblerait pourtant que... Un 
conseil n'y touchez pas). Les 4 premiers 


début de piste synchro IAM 


80 12 
4Ch ) 
début de piste 


Ilexiste un autre type de secteurs recon- 
nus par le FDC, ce sont les secteur dits 
‘’effacés’’, les informations à fournir sont 
les mêmes que pour la lecture normale, 
seul le Data Adress Mark sera différent. 
REM : l'AMSDOS ne s'en préoccupe 
pas. 

‘’formatage'’ : cette instruction ne 
nécessite que 4 informations. 

— la taille des secteurs ; 

— le nombre de secteurs ; 

— le GAP #3 (l'AMSDOS utilise une 
valeur de 50h (80) et la valeur à la lec- 
ture et à l'écriture est de 2Ah (42) ; 
— le modèle de donnée pour le remplis- 
sage (| AMSDOS et CPM utilisent tous 
deux la valeur OE5h (245). 

Il faut aussi remplir un buffer où seront 
stockées les ID des secteurs. 

REM : les ID peuvent n'avoir aucune 
signification, les secteurs seront malgré 
tout accessibles, à condition de fournir 
au FDC les données adéquates. 


STRUCTURES D'UNE PISTE 


vide synchro 
50 12 


Be te 


AEh 


synchro 


12 


(a) 


1 données du premier secteur 


> 


LA FEh 


premier secteur 


4Eh 


octets constituent ce qu'on appelle l'ID 
(entifiateur) du secteur REM : L'ID n'est 
qu'indicatif et n'a pas toujours la signifi- 
cation à laquelle on pourrait s'attendre : 
on reviendra dessus plus loin. 

Les données pour l'écriture sont les 
mêmes. 


secteur suivant ... 
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CRC : somme de test ; 

IDAM : ID adress mark ; 

IAM : index adress mark ; 

DAM : data adress mark. 
Théoriquement tous ces octets ne sont 
pas disponibles pour l'utilisateur, mais il 
existe un moyen d'y avoir accès. 


LE TRUC 

Il faut pour cela réaliser un formatage un 
peu ‘'spécial'’, mais rassurez-vous, c'est 
sans danger. 

Prenez une disquette normale, analysez 
une piste, initialisez les données pour le 
formatage, allez modifier le 3° octet en 
partant du haut à gauche ae la fenêtre 
‘’analyse de la piste'’ : il doit être à 2, 
remplacez le par 6, formatez la piste. 
(Attention prenez une disquette qui ne 
contient aucune information importante 
car elle serait perdue). 

Il suffit maintenant d'initialiser les don- 
nées du FDC et de lire le secteur. 

Si vous avez suivi ces instructions à la 
lettre, en passant au dump, vous devriez 
devoir découvrir tous les octets précités. 


LA MISE EN ROUTE DU PROGRAMME 
— tapez la partie en BASIC ; 

— Sauvez la; 

— tapez le programme contenant les 
datas du langage machine ; 

- exécutez ce second programme ; 

il vous faut aussi sauver un moniteur 
désassembleur sur cette même dis- 
quette. || faut que ce programme soit 
situé très haut dans la mémoire (30000 
ou plus). MONA31 de HISOFT ou 
D.A.M.S. de Micro-Application convien- 
nent, mais vous pouvez aussi bien utili- 
ser le ‘’Mini-moniteur'’ de Denis BOUR- 
QUIN paru dans CPC n° 11. Selon le pro- 
gramme utilisé il faut modifier en consé- 
quence la ligne 60. 


MISE EN GARDE 

Protégez vos disquettes contre l'écriture, 
une fausse manipulation est si vite arri- 
vée. Ne retirez cette protection que 
quand c'est nécessaire. 


LE PROGRAMME 
Démarrage moteur : 
chose 

Arrêt moteur : utile ! 
Arrêt : fin du programme (dont arrêt 
moteur) 

Passage au dump : sans commentaires 
(dépend du moniteur utilisé) 

Aller piste i : de O à 42, mais oui, on peut 
avoir 3 pistes supplémentaires, mais 
attention certains lecteurs risquent peut- 
être de ne pas apprécier 

Piste suivante : no comment 

Piste précédente : idem 

Ecrire/normal : 

Lire/etface : les données du FDC doivent 
avoir été initialisées correctement. Dans 


à faire avant toute 


une fenêtre située en bas est indiqué le 
nombre d'octets effectivement 
transférés 

Formater : dernière étape du formatage. 
C'est là que le contrôleur formate la piste 
Analyse piste : affiche tous les ID se 
trouvant sur la piste. L'ID en haut à gau- 
che est le premier secteur dont le-numéro 
est le plus faible comme le donne Odd- 
job ou Master Disc) 

Changer le formatage : permet de chan- 
ger les ID,ENTER permet de passer à la 
donnée suivante sans modifier celle sous 
le curseur 

Init donnée format : initialise les valeurs 
standards du GAP #3 à 50H et la don- 
née à ESH 

Changer donnée format : demande les 4 
données nécessaires au contrôleur pour 
le formatage. ENTER pour ne pas modi- 
fier une donnée 

Changer nombre secteurs : de O à 20, 
permet de vérifier si le nombre de sec- 
teurs trouvés est valable 

Ordre des secteurs : permet de changer 
l'ordre. Le premier devient le dernier. Vu 
que lorsqu'on initialise les données du 
FDC c'est l'ID du premier secteur qui est 
prise en compte, c'est utile, surtout pour 
parcourir une piste. 

Attention la rotation ne s'effectue que 
sur les secteurs affichés, donc attention 
aux surprises si après on augmente le 
nombre de secteurs 

init données FDC : initialise les données 
pour la lecture ou l'écriture. L'ID est celui 
du premier secteur du cadre en haut à 
gauche 

Changer données FDC : cf changer don- 
nées format. 


PHASE RESULTAT 

Cadre de droite pour les FLAGS du 
contrôleur 

Cadre à droite du premier et en haut pour 
l'ID. ; 


FLAGS 

Interrupt code : normalement à 1 en fin 
d'instruction 

Seek end : mis à 1 en fin d'instruction 
(de comparaison) 

Equipment check : erreur de lecteur 
Non ready : lecteur non prêt si à 1 
Head adress : toujours à O (sur un lec- 
teur n'ayant qu'une tête) 

Unit select : toujours à 1 

End of track : sur l'AMSTRAD toujours 
à 1 \ 

Data error 1 : erreur de checksum si à 1 
Ovér run : le transfert de données s'est 


fait trop rapidement, des données ont été 
perdues 

No data : l'ID demandée n'existe pas sur 
la piste 

Non writable : la disquette est protégée 
contre l'écriture 

Missing AM 1 : ‘signifie généralement 
que la piste n'est pas formatée 
Control mark : mis à 1 si un secteur 
‘’efface'" est rencontré 

Data error 2 : erreur de checksum (celui 
avant le GAP #3) 

Wrong cylinder : mis à 1 si la piste indi- 
quée dans l'ID est différente de la piste 
physique 

Scan equal hit : non utilisé 

Scan not satisfied : non utilisé 

Bad cylinder : formatage incorrect 
Missing DAM 2 : généralement mis à 1 
quand la piste n'est pas formatée ou ne 
l'est pas correctement. 


CONCLUSION 

Voilà, j'espère que ça n'a pas été trop 
ardu et que tout le monde est arrivé sans 
casse au bout de cet article. Mais sur- 
tout ne vous désespérez pas, si vous 
n'avez pas compris quelque chose, 
essayez le donc. 

Rien de tel que l'expérience, mais atten- 
tion avant de jouer à l'apprenti sorcier, 
protégez les disquettes importantes. 

Bonne expérimentation : faites nous part 
de vos problèmes et de vos trouvailles 
(par écrit). 

Une prochaine fois, je vous expliquerai 
comment déformater une disquette, 
comment on détermine quel secteur est 
le premier sur la piste, comment intro- 
duire des décalages de bits sur la 
disquette. 


BELLONCLE Pascal 


Documentation : 
Livre numéro 10 de Micro-Application 
IBM Hardware Technical Reference 


Remarques complémentaires : 

— Le buffer ‘‘secteurs’’ est implanté à 
partir de l'adresse &4000. C'est donc 
cette zone que vous listerez au moyen 
de votre moniteur. 

— La ligne 60 sera à modifier en fonc- 
tion du moniteur que vous utiliserez. 
Attention ! certains moniteurs (tels que 
ZEN) qui s’implantent trop bas dans la 
mémoire ne peuvent pas être utilisés 
avec ce programme. 

— Le CALL à la ligne 33010 devra être 
adapté en fonction du moniteur utilisé. 


1 ‘ Tapez ce programme et executez-le. -0 FOR 320 10 7 

2 ‘ Il genere un fichier binaire qui 49 READ a$:a=VAL ("8 "+a$) : sum=a+sumxZ: FO 
3 ‘ sera appele par le programme BASIC E #A000+i+j, a 

4 CRAZYI-0, 90 MEXT j 

5 © Son nom est CRAZYZ-0.CMD. 60 READ verif 

ER 70 IF veriffssum THEN FRINT'"'Erreur en li 
Fm gne :":1000+i/4#5 

D se a ee A RS ne nn ner 80 NEXT i 

5 90 SAVE "crazyi-0.cmd",b,%A000,792 


10 FOR i=0 TD 791 STEF 8 


£0 Sue 


pa 


1000 DATA CZ,C2,A0,C7, Dé, A0,C%, 46, 48478 
1010 DATA A1,07,79,41,C23,A5,41,C2, 42273 


45 


1020 
1050 
1040 
1050 


1060 


- 1070 


108c 
1990 
1100 
1110 
1120 
11270 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1270 
1220 
1240 
1250 
Li£60 
1270 
1:80 
1290 
1:00 
1:10 
1:20 
1530 
‘1740 
1250 
1:60 
570 
1:80 
1:90 


1400 


1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 


1500 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA. 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA: 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
FATA 


ET, A1,027,B2,A2,C2:,56,A2, 50060 
C5,66,42,1F,A0,40,40,00,5:952:4 
06,00, 00, 00,00,00,00,00,0 
06,00, 00,00,60,00,00,00,0 
00,00, 00, 00,00,00,00,00,0 
00,00, 00,00,00,00,00,00,0 
00,00, 00,00,00,00,00,00,0 
00,00,00,00,00,00,6G0,00,0 
00,00, 00,00,00,00,00,00,0 
00,00,00,00,00,00,00,00,0 
00,00,00,06,00,00,09,00,0 
00,00,00,00,00,00,00,00,0 

O0 00,09,00,00,00,00,00,0 
00,00,00,00,00,00,00,06,0 

O0 00,00, 006,00,00,00,00,0° 
00,00, 00,06, 00,00,00,00,0 
00,00,00,00,00,00,00,00,0 

00, 00,00,00,00,00,00,00,0 
00,00,00,00,00,00,00,00,0 
00,00,00,00,00,00,00,00,0 
00,00,00,F1,01,7F,FB,ED,5111 
79,0D,3E,05,3D,00,20,FC, 19188 
F1,C9,3A,40,40,00,F5,F5,50147 
01,7E,FB,ED,78,87,20,FEB,21863 
87,20,E0,F1,F1,09,01,7/E,34236 
FB,E5,D5,16,00,21,20,A0,54708 
ES,ED,78,FE,C0,28,FA,0C,54056 
ED,78,0D,77,23,14,3E,05,40825 
ZD,20,FD,ED,78,E6,10,20,27686 
E8,E1,7E,E6,C0,2E,72,D1,53952 
E1,28,06,4F,2D,22,AA,A0,25540 
C9,4F,22,AA,A0,C9,00,24,43374 
Hi,40,01,7E,FB,18,06,0C,237072 
ED, 78,77,0D,23,ED,78,F2,43745 
iD,Ai,E6,20,20,F1,22,B1,23253 
A0,C9,00,2A,B1,A0,01,7E, 36200 
FB,18,06,0C,7E,ED,79,0D,26257 
23,ED,78,F2,39,A1,E6,20,28952 
20,F1,22,B1,40,C9,00,CD, 25729 
F3,42,06,20,F3,00,C5,3E, 44576 
4A,CD,C5,40,3E,00,CD,C5,32559 
A0, CD, D6, 40, 11,23, A0, 1A,43620 
77,23,13,14,77,23,13,1,19652 
77,23,13,14,77,23,C1,10,19990 
DC,FB,CD,21,42,32,AF,A0,53318 


L 
Là 
? 
, 


C9,00,F3,3E, 4D,CD,C5,A0, 36486. 


3E, 00, CD, C5, A0, ZA, A1, 40, 19642 
CD,CS, A0, ZA, A2, A0, CD,C5,47439 
A0, LA AS, A0, CD, C5, A0, 3A, 34774 


1310 


1520 
1520 
1540 
15390 
1560 
1570 
1580 
1590 
1600 


1510 


1620 


-16:0 


1640 
1650 
1660 
1670 
1680 
1670 
1700 
1710 
1720 
17:20 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1829 
18:0 
1849 
1850 
1860 
1870 
1680 
1870 
1900 
1910 
1920 
19:20 
1949 
1950 
1980 
1970 
1980 


DATA 
DATA 


DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


‘DATA 


DATA 
DATA 


‘DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
CATA 
DATA 
DATA 


AG, A0,CD,C5,40,CD, 2A,A1,42777 
CD, Lé,A0,FE,C9,00,F3,2%E, 51226 
46,CD,C5,40,2E;00,CD,C5,32047 
AO, ZA, 40, AO, CD, C5, A0, 3A, 24678 
A1,40,CD,C5, 40, 32A, A2, 40,4255 

CD,CS, 40, 3A,A3,A0,CD,C5, 47447 
AO, 3A, A4, A0, CD, C5, A0, 3, 34806 
A5, A0, CD,C5, 40, ZA, A6, A0, 43076 
CD, C5, A0,CD,0E, A1, CD, Dé, 48628 
A0,FB,C9,00,F3,2E,45,CD,45511 
CS, A0, 3E, 00, CD, C5, AG, 34, 40246 
AO, A0, CD, C5, A0, ZA, A1, A0, 42426 
CD, CS, A0, A, A2, A0,CD,C5, 47439 
A0, ZA, A3, A0, CD,C5,40,14,234774 
A4, A0, CD,C5, A0, ZA, A5, A0, 42946 
CD,CS,A0,3A, 46, A0,CD,C5,47471 
AO, CD, ZA, A1, CD, Dé, A0, FE, 40587 
C9,00,21,00,3A,23,23,11,27475 
04,00,7E,06,01,00,19,BE, 4888 

28,08,04,4F,78,FE,21,79,9379 

20,F3,2E,20,C9,00,19,EB,24037 
4F,D5,21,00,14,11,06,00, 25:44 


19,D1,14,11,04,00,04,BE, 17910 


79,20,D4,05,78,C9,00,01,262:57 
7E,FA,3E,01,ED,79,01,00,36510 
89,00,08,78,H1,20,FA,C9,20901 
00,01,7E,FA,AF,ED,79,C9,10887 
00,3E,07,CD,C5,A0,2E,00,9812 

CD,C5,40,3E,28,CD,CE,A2, 46674 
18,05,00,E5,D5,C5,F5,00, 100238 
3E,08,CD,C5, A0, CD, D6, A0, 20848 
3A,21,A0,F5,3E,0F,CD,C5,19739 
A0,3E,00,CD,C5,40,:34,AB,23027] 
A0, CD,C5, 49,34, AB, A0,47,44003 
F1,90,38,05,CD,CE,A2,168,44748 
06,00,ED, 44,CD,CE,A2,00,12228 
3E,08,CD,C5,A9,CD, D6, A0, 20848 
ZA,21,40,21,AB,A0,EE, 20, 17604 
A7,F1,0C1,D1,E1,C9,00,F5,49169 
3E,0C,CD,E7,A2,F1,:5D,20,21:74 
F5,3E,10,CD,E7,42,2E,08,41748 
CD,CS5, A0, CD, Dé, A0, 09,00, 50002 
F5,3E,F4,23D,20,FD,F1,23D,45987 
20,F5,C9,21,A0,40,3A,AE,2894 
A0,77,23,0F,77,23,77,23,33301 
2D,77,23,30,77,23,2E,2A,1878Z 
77,23,2E,FF,77,CD,45,41,25799 
21,00,27A,09,00,00,00,00,929é 


Lo nb=21:Diff btinb! 

20 MEMORY 22S9FF 

20 FEY 15,'"mode 2:pen i:paper O"+CHR$ (12) 
45 MODE Z2:1INE O,12:INE 1,0: BORDER 16 


90 GOSUE 1000:1F FEEE (&A000)<%195 THEN LOAD "crazv2-0.cmd 
212324 THEN LOAD "monazl.bin", 


100 WINDOW #5,2,22,2,12 
110 WINDOW #4,25,58,7,6 
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DATAMAT PCW : Enfin une gestion de fichiers 
SIMPLE, RAPIDE ET PUISSANTE SUR PCW 
Pour 590 F seulement! 


DATAMAT PCW 


- Il permetde créer 32767 enregistrements par fichier. 

- Chaque fichier peut comprendre jusqu'à 83 zones 
de saisie réparties sur 9 pages écran. 

- L'utilisateur peut créer lui-même ses formulaires de 


saisie. 


- Datamat PCW permet de relierles fichiers entre eux afin 
de transférer des données d'un fichier à un autre. 

- Avec Datamat PCW, il est possible d'effectuer des calculs 
sur les zones de saisie (addition, multiplication, etc..). 

-Le format d'impression peut être modifié (impression en 
liste, justification à droite ou à gauche, en-tête, etc..). 

- Simplicité d'emploi : Datamat PCW fonctionne avec des 
menus gérés par touches de fonctions. 

- Toutes les opérations sur fichiers (saisies, modification, etc.) 
s'effectuent directement sur disquette. 

- On peut créer autant d'index que de zones de saisie par fichier. 

- Tri en ordre croissant ou décroissant. 

- Possibilité d'utiliser le RAM DISC avec le PCW 8512. 


Réf. : AM 316. Prix : 590 F TTC 


M Moniteurs 
22 Claviers 


ler senestre 


CSInprinantes 


I Moniteurs 
UE Claviers 


E Claviers 


CSIaprinantes 


PCW GRAPH est le logiciel qui vous permettra de représenter 
graphiquement vos données sur PCW 8256 et 8512. Vous pourrez 
obtenir des histogrammes de différentes formes qui agrémen- 
teront les résultats de vos applications ou des programmes que 
vous utilisez. Il vous sera, par exemple, possible d'afficher jusqu'à 
quatre zones d’un tableau créé par MULTIPLAN. En fait, tous les 
logiciels pouvant générer des fichiers au format ASCII (la plupart 
le permettent) peuvent communiquer leurs données à PCW 
GRAPH. Une fois définis, ces graphiques seront imprimés. 


Caractéristiques du logiciel : 


- De 1 à 4 graphiques directement à l'écran. 

- Editeur de texte pour ajouter des commentaires aux graphiques. 

- Sept types de représentation graphique (barres, barres 3D, 
cumuls, cumuls 3D, lignes, surfaces et secteurs). 

- Editeur de trames. 

- Deux échelles pour la sortie vers l'imprimante, dont une en 
pleine page. 

- Possibilité d'affichage des légendes et d'une grille de référence. 

- Utilise des fichiers au format ASCII. 


Systèmes requis : 


PCW GRAPH fonctionne sur PCW 8256 et 8512, il utilise l'imprimante 
de cet ordinateur. 


Réf. : AM 315 - Prix : 395 F TTC 


BIEN DEBUTER 
AVEC LEPCW 

Le premier livre pour 
l'AMSTRAD PCW! Cet 
ouvrage vous permettra 
de réussir à coup sûr vos 


puissant taitement de 
texte LOCOSCRIPT, puis 
la programmation BASIC 
MALLARD et l'utilisation 
de CP/M.Indispensable 
pour bien profiter de sen 
PCW 


LE LIVRE DE 
L'AMSTRAD PCW 
Vous possédez un PCW 
et vous voulez en tirer le 
maximum? Alors ce li- 
vre a ête ecrit pour vous! 
Grace à lui vous utilise- 


Une formation intensive 
au BASIC MALLARD vous 
permettra d'écrire des 
routines d'édition, un 
generateur de masques 
de saisie, des routines 
de tri et une gestion de 


débuts sur le PCW. On Réf. : ML 164 : fichier 
>. rez au mieux le LOCO- 
découvre pas à pas le Prix : 429 FF SCRIPT et profiterez de Ref. ML165 
Si vous voulez connaitre votre toutes les possibilités Prix :479 FF 
revendeur le plus proche, contactez-nous au offertes par le CP/M 
47-70-32-44 
mn eu ou mu BON DE COMMANDE = = On om mm CCE 


horaires d'ouverture 
9h-13h / 14h-18h 


TOTAL TTC 


MICRO APPLICATION 
13,rue Sainte Cécile 75 OO9 PARIS 


Tél. :(1)47-70-32-44 17 


B 


DESIGNATION QUANTITE 


D Mandat [ Cheque D CCP. I 
Libellez vos chèques a l'ordre de Micro-Application. 


Nom, Prenom 


Adresse 
LI UNSS PDP CAR ENS EE 01: 


CS 0000 00000000 


- 20F de frais d'envoi Date et signature 
ou 40 F pour envoi recommande. 


{io WIPO 
159 WINLW 
Lt WIHDUW 
150 WIHDOiy 
16) WIHDOW 
170 WINDOW 
200 


a 
te 


18,24: CLSHZ:WINDOW #Z,2,22,19, 2%: CLSHZ 


219 DAT " x ETAT 0 X",Inter.code,Seek end,equip.check,Non ready,lHead adrezs,nit select 
2e0 DATA " X ETAT 1 X",End of Track,Data errori,üver run,No béta: Non Writable,Miszsing Aadr 
.Marti 

210 DATA " x ETAT 2 X",Control mark,Data error2,Wrong Cylinder,Scan equal hit,scan fail,H 


ad cylinder,missing Adr.bark2 

200 GUSUE S0GC:GUSUE 4000:GO0OSUE 3000:GDSUB Sû20:G0SUE 6090: GOSUB 7000:GOSUL 8000: GOSUE Gouc: GOSU 
L 10000 

400 DATA Lemarrage moteur,Aller en piste 1,Fiste suivante,Fiste precedente, Analyse de la piste,0 
rdre des secteurs,Changer le for 

A10 DATA Init. donnees FLC,Changer donnees FDC,Drdre des secteurs,Lire le secteur,Lire coct., eff 
eta, Ecrire le secteur,Ecrire sec 
Du RESTORE 400:FOR 121 TO nb:READ b$(i):NEXT 
310 GOSUR 11000 

iQ aSSINEEN SI IF A$="" THEN 530 
IF ASC(A$S)=240 THEN GOSUR 17000 
1F ASC (A#) 1 THEN GOSUE 12000 
IF ASC(A$)=13 THEN 2000 
So GOTO 5:0 A PROPOS DU LISTING 
1000 +dcin=fA0c 
1Ui0 result 


Vous remarquerez que, contrairement à l'habitude, ce listing a été édité sur toute 
la largeur de la page. Ceci est dû au fait que l’auteur a utilisé des caractères de 
contrôle et que, de ce fait, nous avons listé le programme via un traitement de 
texte. 

Lorsque vous rencontrerez Une ligne avec le signe X, il faudra taper CTRL X (appui 


JO forinat: 
too Lectur 
OS acris 
1460 calibre 
Jii0 startmet 
1090 STOFmM 
iQ endrt 
1150 param=%AUAU 
1110 RETURN PEER - ss 
2000 ON opos EUSIIE 28000, 20000, 21000, 22000, 22000,25000,27000, 24000, 8000, Leu, 26000, 4uuu, soc 
25000, 28000, 20000,27000, TOO, 
2019 OUI 5,20 
3000 CLORS 
210 FRINTH#46," X FHASE RESULTAT X" 
20 FRINT#S," numero de piste 5 "SHEXS(FEEI 
1 FRINTHS," adresse de tete 1 MSHEXS (PEER (404), 23 
2040 FRINTEL," numero de secteur ?: "ÿHEXS$ (PEER (£4025),2) 
2060 PRIE," taille du secteur : "3HEXS(FÉEE (RAD26) ,2) 
39860 RETURN — | ee 
DATA I) Nr #4,60,79,2,24:CLS#4:RESTORE Z10:FOR 1=0 TO 21: READ ab: PRINTHA, a$:NEXT:WIHDONtHA, 
BAS CLS#AsFRINTAA,  Messssr sis 
ain pes : 
Sous WIHDOW #0,1,80,1,28:FEU Ci: PAFLR 1: CLE:FEN LE FAFER 0 
Soi WINLUH #0,2,22,14,163KRE TURN ! 
1 Parbr 4, 0:CLSH 7: WINLOUR,27,56,7, LI: PEN. #7, CG: EAFER #7, 1iCLS #7 
ERINEUH7," Crazy % 2.0" 
CÉLFTAES" cogyrighE 1589 
FRIHTR7," Fascai Lelioncie" 
: RETURN 
fon CLS GE FÉINI#S," X énalyse de la piste X" 
Sul Fiir 1=l (9 FEEF (éAUAF: STEF À 
4 FRITES USING HAS 1; 
FIST HER PEEE CG 
cp PRINT AS," "SHEXS (FEEF 
AGE FRITITHS "OMS HEXSE(PFEEE 0 
not FREINS, "US HEXS MEET C2 
1 1 122 FEEr C@AO0AI) THEN 
PET 


simultané sur CTRL et X). 
Pour le signe — ce sera CTRL et | 
Pour le signe Î ce sera CTRL et K 
Pour le signe | ce sera CTRL et J 


Et n'oubliez pas de modifier les lignes 60 et 33010 en fonction de votre moniteur ! 


(MAO) , 5) 


AGE Ci-1) #4), 2): 
AO1+(i-1)#4), 213 
ZAOU2+ (C1-1)#4),213 
+(i-1)#4),2735" ; 


CHINE #5, US THE ni+is 


MICRO APPLICATION 
Vous pouvez compter 
: Le sur ce livre! Si le nouvel 
AMSTRAD PC 1512 vous 


intéresse cet ouvrage 


; vous expliquera tout ce 
qu'il faut savoir pour décou- 
- vrir, profiter et exploiter 
LC au mieux cet appareil fantas- 
= D: 
A A QE 


Prix: 99F 
o #= 
« N Q 
© Ô F4 o É £ 
ÈS © % S S () ©O © 2 Ge Q 2 
Lo = = &u 
<£ Ÿ eg 589 m9 08 LE Geo geS$£ + Do 29 
cÉ F of os SSS8 LS LE ÉS © SES SES 5 5 ÉE 
T AO Q0 «< LS 2 S a Q 
« œ SS SO SE SSL LTS 2 € IS LS UE Ég Se 
CR o Le) de QT 2XZ 2is Te uo \ d STTS TT a 0 à 
0& © FAQ EL ES T7 <à dT pa &£a EEE S £ re 
SS OS o OZ SEO Oj JO +0 KO 235 OETS ST ©S SU 
9 ÈS 4£ SO SS9 TES SSs 8° Es Is TEE LT Oo Le 
20 in To # Fi BC di. ST Yo Sa “a 
Ref. : ML 119 Réf. : ML 120 Réf. : ML 122 Réf. : ML 124 Ré. : ML 127 Réf. : ML 128 Ref. ML143 
Prix :429F Prix :99F Prix : 249 Prix :429F Prix :449F Prix : 449 F Prix :449F 
Ref. : ML 112 Ref. : ML 118 Ref. : ML 121 Ref. : ML 123 Réf. : ML 126 Réf. : ML 131 Réf. : ML 132 
Prix 449F Prix :449F Prix :429F Prix :429F Prix :99F Prix : 499 F Prix : 429 F 


LE GRAND LIVRE 
DU 6128 


Réf. : ML 165 
Prix : 479 FF 


Réf. : ML 164 
Prix : 429 FF 


(9 
1 ] 
Réf. ML 146 Ret.: ML 162 Ref. : ML 151 
EURE LE Prix :499F Prix 449F Prix :449F 
a) È Réf. : ML 145 Rét. : ML 147 Ref. : ML 150 


Prix :99F Prix :429F Prix :479F 


Réf. : ML 168 
Prix :449F 


D RL TR 


U Mandat !]Chè l 

DÉSIGNATION QUANTITE Mandat [Chèque L] CCP,. 
libellez vos chèques à l'ordre de Micro-Application. 
Nom, Prénom ____ XeÉ CE 


Adresse 


4) 


: MICRO APPLICATION 


13,rue Sainte Cécile 75 OO9 PARIS 
Tél. :(1) 47-70-32-44 


MU == - Enr ces doute CP nee sn ee, + 
es] OOO0C 000 000000 


Date et signature 


+ 20 F de frais d'envoi 
TOTAL TIC ou 40 F pour envoi recommande. 
CB date d expiration: Port gratuit pour toute commande superieure à 250 F. 


CPC 12 86 


LAOG+ IL) ES) T1: 
O1+(1)#4),2): 
O3+(i1)#4),213: 
O+(1)#4),2) 


GS BRINERS, MS HAS (PECE CG: 
9100 FÉINIHS," MSHEXS(FEEE (& 
S110 FRINIHS," "SHEXS(PFEEE 
Hi20 FRINTHS," "SHEXS (FEEE CZ 
120 NEXT i 

4140 REFURN 

700 CLS #1 

7010 FRINT#1," X DÜNNEES FLE X" 

7020 FRINT#I," numero de piste + ";ÿHEXS$(FEEE (&IF 10) , 21 
7020 FRINT#1," numero de tete “sHEXS (FEER (RFF 117,2) 
7040 FRINT#T," numero de secteur : "sHEXS(FEEE (&3F 121,2) 
7050 FRINT#1," taille du secteur : ";HEXS$(FEÉER (&3F125),2) 
7080 FRINT#1," dernier numero 5 "HEXS(FEEF (&3F14),2) 


7070 FRINT#1," GAF #3 5 MSHEXS (PEER (&IF 15), 2) 
7680 FRINTH#1," longueur 5 "sHEXS(FÉER (UIF 16) ,2) 


7490 KETUFH 

BQGO CLEH#d: a=FEEK (EAQZON 

8010 a$=RINE Ca,9) : aF=RIGHTS (a, 4): a$=LEFTS (at, 4) 

8û aŸ=a$+"l "ra$=RIGHTS(STRECINT(a/64)),1)+a#:FRINTRA,a#; 
8070 a$=H[INE(FEEK CRAOU21),8): a$=LEFTS (a, ii +MIDS(a$,2,2)+RIGHTS (a#,27) 
6040 FRINTH4, a#;" "à 

GO Aa$S=RINE (PEER (RAO0Z21 , fi 

B£O a$=R [GHTS CAR, 

Bio FRINFH#4, at 

SO RETURN 

GoG0 CLERHE: FRINT#2," numero de piste: "; FÉEF (8&A04B) 

Sul0 FRINIHZ," Octets lus :"sbflen 

7020 RETURN 

ou CLS Ho 


10010 FRINT#G," X DÜNNEES FORMATAGE X 
10000 FRINTHO," Taille sec.:";HEXS (PEEE (&IFO0) ,2);" Nonbre Sec. :"3;3HEXS$(FEEK(&3FC1),27) 
LOUIQ FRINERO," GAF #3 1" HEXS (PEEE (&3F02),2)3;" donnee 1" HEXS$ (FEEK (&3F 027), 2) 


1004 RETUFH : 
11000 WINLOW #2,2,213,18,24:CLS#2:WINDOW #2,3,32,19,23:CL5S#7 
11010 IF opostio THEN 11500 
11020 FOR i=nb-1 TO hb:FRINTHEZ," "a b$(i):NEXT 
11070 FRINTH#3,"X “:b#(1):" X" 
11040 FOR i=2 TO Z:FRINTHS," “sb$(C1):NEXT 
11950 opos= 
11060 RETURN 
11500 
11510 CLS #3 
11520 IF opos-230 THEN FRINT#S," "sb$(opos-2}r ELSE FRINTHI," "sb#(opos-£+nb) 
11550 IF opos-10 THEN FRINTH#Z," ";b$(opos-1) ELSE FRINT#S," “;b$(opos-1+nb: 
11540 FRINT#S,"X "sb$(opos);" x" 
11550 1F oposti<nb THEN FRINT#2:," "sb$(opos+1) ELSE FRINT#Z:," ":b$(opos+i-nb! 
11560 IF opos+2<nb THEN FRINTH#3," "sb$(opos+2) ELSE FRINT#S," ";b$(oapos+£-nb) 
11570 RETURN 
12000 Isi+i 
12010 IF oF0OS=nb THEN npos=i ELSE npos=0oF0S+i 
20 LOCATE#S,1,3:FRINT#Z," "sb$(oF05);" " 
LOCATE #S,230,5:FRINTHZ 
à IF opost%nb THEN FRINTÉ#Z," "sb$(Copos-nb+23) ELSE FRINTÉS," "sb#(opost:) 
12050 LOCATE#ES,1,3:FRINT#S,"X ";b#&(npos)s:" X" 
12060 opos=npos 
12070 RETURN 
125000 j=i-1 
12010 IF opos=i THEN npos=nb ELSE npos=opos-1 
12020 LOCATEIEZ, 1,2: FRINTHZ," "3 b$ (oFOS)3;" " 
12070 LOCATE HE 1,12 FRINTES, "A "s 
12040 IF opos-3<1 THEN FRINT#S,Db$(opos+nb-Z)ELSE FRINTHS,b4% (5pos-:) 
12030 LÜCATEAS, 1,23: FRINT#S,"X "“sb$(npos);" X°" 
1506 opos=npos:hkRE TURN 
20000 ‘aller en piste 1 
2CUOIG CLS #Z 
SNUEQ INPUT #7, "humere de piste : ",track 


50 


NOUVELLE 
VERSION 


TRI ULTRA RAPIDE 


Datamat 
Gestion de fichiers 


Pour avoir la nouvelle version de 
DATAMAT, envoyez votre disquette 
d'origine à M.A. muni d'un chè- 
que de 50 F pour frais d'envoi. 


Ref. : AM 304 
Prix : 450 F disq 


Textomat 
Traltement de textes |. 


Ref. : AM 305 
Prix : 450 F disq 


Caleumat . 
Tableur 


Rèf. : AM 311 
Prix : 450 F disq 


AUTOFORMATION 
A L'ASSEMBLEUR 
EN FRANÇAIS 

SUR PCW ET CPC 


Contient un livre et un logiciel. 


Cet ouvrage introduit le débutant à la programmation du 
Z80 grâce à la méthode du Dr WATSON qui selon les cri- 
tiques vaut son pesant d'or! Aucune connaissance préa- 
lable n'est requise et le but du livre est d'assurer au 
novice.un succès total. A la fin du livre les instructions du 
Z80 sônt expliquées en détail. De nombreux exemples 
illustrent les différentes étapes du cours alors que des 
exercices (les solutions sont fournies) testent la compré- 
hension. D'autres chapitres montrent comment de nou- 
velles commandes peuvent être ajoutées au BASIC, no- 
tamment une routine de traçage de CERCLE. 


‘ 
MA. L 


Un assembleur Z80 complet 
est livré sur cassette et 
comprend : 

e Etiquettes Symboliques 
e Directives d'Assemblage 
e Chargement/Sauvegarde 
e Copie Ecran 

e INSERT/DELET. 
L'assembleur permet d'écrire des programmes fa 
cilement en langage d'assemblage puis les transforme 
en code machine (langage 
machine). 


Pour vous aider à com- 
prendre les notations ma- 
thématiques utilisées, une 
démonstration de l'utilisa- 
tion des nombres binaires 
et hexadécimaux est fournie. 
Un programme utilisant les 
commandes graphiques ad- 
ditionnelles décrites dans le 
livre est également fourni. 
Pour CPC : 

version Disk : 298 F 

version Cassette : 198 F 


4) 


MICRO APPLICATION 


13,rue Sainte Cécile 75 OO9 PARIS 
Tél.:(1) 47-70-32-44 


Pour PCW : 
version Disk : 298 F 


MICRO APPLICATION 


les professionnels 
sur Amstrad CPC PC PEW 


DB COMPILER 
SUR PCW ET CPC 


4 


DB COMPILER 


dB Compliler : un compilateur pour dBASE 11! 


Le compilateur dB Combplier traduit votre programme écrit sous 
dBASE Il en un jeu d'instructions proche du “langage machine” 
(donc très rapide) et pouvant être exécuté indépendamment de 
dBASE Il. dB Compliler est le premier compilateur pour dBASE II, le 
leader des SGBD sur AMSTRAD PCW. dB Compiler permet de faire 
fonctionner vos applications dBASE II sans dBASE II. Celles-ci peuvent 
être diffusées librement sans aucune redevance à payer. 

Les avantages de dB Complier : 

- Simplicité d'emploi. 

- Pas de redevance. 

- Protection du Code Source. 

- Indépendance de dBASE Il. 

- Accroissement de la vitesse d'exécution (jusqu'à 10 fois plus rapide). 
- Gestion entièrement automatique de la mémoire. 

- Facilité de maintenance des programmes source. 

Avec dB Compiler votre application fonctionnera plus rapidement 
et indépendamment de dBASE II. Vous pourrez ainsi la recopier et 
la faire fonctionner sans dBASE II. 


Documentation en français. 


DB Compiler : 
Réf. : AM312 
Prix : 790 F TTC 


LA SOLUTION 


(5) 


Y— 


La SOLUTION c'est votre solution BUREAUTIQUE COMPLETE sur AMSTRAD CPC. En effet, ce package 
regroupe trois logiciels (Traitement de Texte, Gestion de Fichiers, Tableur Graphique) complémentaires et 
homogènes qui vous permettront de traiter efficacement toutes vos tâches de bureau (rapport, courrier, 
tenue des fichiers, publipostage, calculs prévisionnels, représentation graphique des résultats, etc.). Les 
trois logiciels pouvant s'échanger leurs données, les possibilités offertes par la SOLUTION sont très vastes : 
on pourra par exemple réaliser un mailing à partir du Traitement de Texte en reprenant les adresses sélec- 
tionnées à partir de la Gestion de Fichiers et un tableau de prévisions réalisé par le Tableur sera inséré dans 
le texte. Enfin rappelons que les trois logiciels composant LA SOLUTION sont trois best-sellers interna- 


tionaux de haute qualité : TEXTOMAT, DATAMAT, CALCOMAT. 
Demander le catalogue 
GRATUIT. —È& 
= On 


RER en ee. en, pe RON PAGOMMANDE en gen. en, mn eu 


Réf. : SOL - Prix : 950 F 


| 


DÉSIGNATION QUANTITÉ | PRIX MARCARE CRAN  EC CE 
[| Libellez vos chèques à l'ordre de Micro-Application I 
i Nom, Prénom mé I 
Adresse 22 2 g 
| VB OP, ER °{ 
a 
I e= O0O0 000 O0OCCOOO °[ 
ë à. 
Date et signature O 
| + 20 F de frais d'envoi 
à TOTAL TIC ou 40 F pour envoi recommandé. | 
CB date d expiration: Port gratuit pour toute commande supérieure à 250 F. 
FSSS SSL RS URSS SES Se 


ÉVOE0 IF Erack 0 UK Etrack:d2 THEN Zovio 


20040 FOLE SAGE, track MICRO-INFORMATIQUE 


20051 CALL calibr 


20040 GOSUE GQ000 
20070 DESUE 11000 
20080 RETURN À 
21000 ‘Fiste suivante 


IF track=92 THEN trackzu ELSE track=track+l LE SPÉCIALISTE AMSTRAD 


“3 GUIO 20040 
) RETURN 
) ‘Fiste precedente + 400 softs 
IF track=O THEN track=42 ELSE track=track-1 
> GDIG 2voga en stock 
RE TURN permanent 


‘Analyse de la piste 
Tous les ouvrages 


CâLL anta 
GOSUEH £oiti 
POFHE 82FO0,FEEF (2402): FÜLE SEFO1, FÉEE CAUAF) SUr Amstrad 
BOSUE ice 7 Bd se nee 
D ans f ee 
FOFE S2FIO,FEEE C&ZA00) 000 

Tél. 50.57.70.41 


COMPTAFACIL 


PUEE 8. 12, FEEE (IT A0 2) 
FOFE SZ2F1Z,FEEF (8307) 
GOSUE 7000 
KE TUIXN 
Progiciel de comptabilité générale utilisé depuis 1982 
par des PME, agriculteurs, artisants et libéraux. De la 
saisie au bilan, 8 journaux, 900 comptes (7 chiffres), 
lettrage. Edition des comptes, journaux, grand livre, 


24000 Formater la piste 
24010 FOFE param, FEEE (&21F02) 

balance, compte de résultat et bilan (provisoire ou défi- 
nitif au choix). 


24020 FOFE param+i,FEÆEE (&2F00) 
24070 POSE paramt2,FEEFr IF 0 
24040 FÜFE paramti,FEEE CGI 
Fonctionne sur AMSTRAD sous CPM 2.2 ou 3.0 avec 
2 lecteurs, version pour 464, 664, 6128 et PCW 8256. 
Fonctionne sur IBM PC et compatibles (MSDOS) 


24050 FLE endrt,0 

24460 FOÉE endrt:+1,8354 

24u7o CALL format 

24080 bflen=256+# (FEErE (endrt+1)i-%74)+FEEE (endrt) 
24090 GOSUE 2000: GÜSUE BGu0: GOSUR 7U00 

24100 RETURN 

25000 ‘Ordre des secteurs 

25010 FOR i=0 10 Zia(i)=FEEE (&2400+1) : NEXT 
29020 FOR izi T0 FEEF (SAOAF 1 

FÜOLE &RA00+ Cu 10 44, PEEK CAE 1 #4) 


Démo automatique sur PCW 
et compatibles. 


FOIE 
FOFE 2: 
HEXT 


Disquettes de démonstration. 
25080 FOR i=G 10 Z:FORE 23A00+i4 (PEER (AOF) -1) #4, a Gi) :NEXT 
23099 :GOSUER 9000: FE TURN 


B.P. n° 2 St-Philibert 
MER 56470 La Trinité-sur-Mer 
97 55 09 74 
Len00 ‘nb de secteurs 


24010 CLS #!:INPUIKT, Hombre de secteurs ? ",i LENS 

26U20 IF 1:21 THEN FOHE SAOAF,i:FUEE 22F01, i MICRO 

260204 GOSUB 10600: GOSUE 8000: GOSUR 11600 

26040 RETURN 

27000 ‘Changer le formatage INFORMAT UE 
27010 FÜR 1z{i 10 FÉEFH(ZA04F) STEF 2 


27020 FOR J=0 TO 3 
. Revendeur qualifié 


27020 LOCATEHRS, 4+jet,2#+(i-1)/2 
27040 INPUT #5,"",a$ 


conseil AMSTRAD 


ga sun ER HE HTAOUE à - * ji, VE na," _ 
IF à THEN FUHE &2AO0+ CGi-1) #44 j, VAL ("2"+a8) Point pilote 


HEXT à : 
270 IF à: =PEEF (£ACAF) THEN 27120 nouveautés, softs 

27080 FOR i=0 T0 © et périphériques 

27090 LOCATER#S, 214982, 2+ 0-1) /2 

27100 INPUT #5,"",a$ à 

2TINO IF a$is"" THEN FOE 8ZA0O0+1#44j, VAL ("B"+as) 96, Av. Alfred Maës 

27120 NEXT à 62300 LENS 


PTE Tél.: (21) 28.72.44 


27140 GOSUE #0 


52 


ÿes 


CRÉEZ Vous-MÊME Vos LOGICIELS 


COMMERCIALISÉE AVEC SUCCÈS SUR PC ET COMPATIBLES, MICRO APPLICATION 
VOUS PROPOSE DÉJÀ UNE VERSION COMPLÈTE ET INTÉGRALE DE CE PUISSANT 
GÉNÉRATEUR D'APPLICATIONS ET À UN PRIX AMSTRAD. 990 F HT. SEULEMENT! 
YES YOU CAN 'EST LE LOGICIEL FRANÇAIS VOUS PERMETTANT,QUE VOUS SOYEZ 
NÉOPHITE OÙ SPÉCIALISTE EN INFORMATIQUE, DE CRÉER VOS APPLICATIONS DE 
GESTIONS PERSONNELLES. 


SIMPLE 
ALLONS À L'ESSENTIEL, VOUS AVEZ DES APPLICATIONS À CRÉER, VOUS N'ÊTES PAS 
INFORMATICIEN ET VOUS NE VOULEZ PAS LE DEVENIR. GRÂCE À LA SIMPLICITÉ 
D'UTILISATION DE YES YOU CAN! VOUS POUVEZ RAPIDEMENT DÉCRIRE VOTRE 
APPLICATION TELLE QUE VOUS LA CONCEVEZ. YES YOU CAN !MET SA PUISSANCE À 
VOTRE SERVICE POUR LA RÉALISER. 


RAPIDE 


YES YOU CAN ! VOUS PERMET DE DÉVELOPPER VITE DES APPLICATIONS DONT LES 


PERFORMANCES, LA QUALITÉ DE PRÉSENTATION ET LA SÉCURITÉ DE FONCTIONNE- 
MENT SONT ÉQUIVALENTES AUX MEILLEURS LOGICIELS ÉCRITS PAR DES PROFES- 
SIONNELS DE L'INFORMATIQUE. 


PUISSANT 
AVEC YES YOU CAN ! VOUS DISPOSEZ D'UN MOYEN D'ÉCRITURE EFFICACE ET CON- 
VIVIAL, RAPIDEMENT ASSIMILABLE. SON LANGAGE ORIGINAL ASSOCIÉ À SES MODU- 
LES SPÉCIALISÉS GÈRENT. EN TOUTE SÉCURITÉ, LES FONCTIONS RENCONTRÉES 
DANS LES APPLICATIONS DE GESTION. 


CARACTÉRISTIQUES TECHNIQUES: 


NOMBRE DE FICHIERS PAR APPLICATION.................... ILLIMITÉ 
FICHIERS MIS EN LIAISON SIMULTANÉMENT.................. 6 
FICHES:PAR:FICHIER 2% +de 8 un mn ne Ne ea toerog 16 MILLIONS 
RUBRIQUES PAR FICHE................................. 100 
CARACTÈRES PAR FICHIERS nn rapera ete os eoate oetee lente le 6400 
TAILLE MAXIMUM D'UNE FICHE EN PAGES ÉCRAN .............. 4 PAGES 
CLÉS'PAR: FICHIER: 282 dre cé nee aise rene die Rata Net 5 
RUBRIQUES PAR:ÈLÉ 84 dt eu age es mate Ne) 

CRITÈRES DE SÉLECTION PAR FICHIER ..................... 100 
PRÉCISION(DE CALCULS te re ohne manne eme 16 CHIFFRES 
LANGAGE 


YES YOU CAN! INTÈGRE UN PUISSANT LANGAGE DE PROGRAMMATION EN FRAN- 


ÇAIS PERMETTANT DE TRAITER TOUTES LES APPLICATIONS SPÉCIFIQUES DE 
GESTION. 

RAPIDEMENT ASSIMILABLE, CE LANGAGE EST COMPOSÉ DE 32 MACRO-INSTRUC- 
TIONS PARAMÉTRABLES ET D'UN SYSTÈME D'ÉCRITURE ORIGINAL SUPPRIMANT TOU- 
TES POSSIBILITÉS D'ERREURS DE SYNTAXE. 

LA MISE AU POINT DES PROGRAMMES EST FACILITÉE PAR UN MODE “TRACE” FAI- 
SANT APPARAÎTRE CHACUNE DES INSTRUCTIONS AVANT SON EXÉCUTION. 
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MICRO APPLICATION 


13 rue Sainte Cécile 75 OO9 PARIS 
Tél.:(1) 47-70-32-44 


va Can / 


LE GÉNÉRATEUR D'APPLICATIONS 
——— SUR AMSTRAD PC 1512 —— 


FONCTION PRÈ-PROGRAMMEES 
GÉNÉRATEUR DE MASQUES D'ÉCRAN ET D'ÉDITION. 
GÉNÉRATEUR DE MENUS. 

GÉNÉRATEUR DE GESTION DE FICHIERS. 
GÉNÉRATEUR D'ÉTATS. 

GÉNÉRATEUR D'HISTOGRAMMES. 


FABRICATION 
STATISTIQUES 
PAIE 
RELANCES 
STOCKS 
FACTURATION 
CLIENTS 
FOURNISSEURS 
TRÉSORERIE 
PRODUCTION 
COMPTABILITÉ 
PRÉVISION 
BUDGÉTAIRE 


Ve por 


UTILITAIRES 


DES FONCTIONS ANNEXES PUISSANTES PERMETTENT DE MODIFIER LA STRUCTURE 
DES FICHIERS EN COURS D'EXPLOITATION, DE RÉGÉNÉRER DES FICHIERS OU D'AIDER 
À LA MISE AU POINT DES PROGRAMMES COMPLEXES. 

LES APPLICATIONS GÉNÉRÉES AVEC YES YOU CAN! NE SONT PAS ISOLÉES. PUIS- 
QU'UNE OPTION PERMET D'IMPORTER ET D'EXPORTER LES FICHIERS EN CRÉANT 
AINSI DES FICHIERS DANS UN AUTRE LANGAGE (LOTUS, OPEN. ACCESS, BASIC. 


PASCAL, COBOL. ETC.) 


PRIX: 990 FH.T./117414 T.T.C. 
CT ccp CT ManDar [] CHÈQUE BANCAIRE 


O00 000 000 000 000 


RÉF.: YC 001 


l JE DÉSIRE RECEVOIR YES YOU CAN! POUR LA SOMME 
OÙ DE 117414 F T.T.C. ET JE VOUS JOINT MON RÈGLEMENT : 


DATE D'EXPIRATION: 


NOM: 
PRÉNOM: 


ADRESSE : 
VILLE : 


sienarure [7] 


27154 RETURN 


2 
28000 ‘Lire le secteur 
28010 FOR i=Q 10 6:FOFE SAOUAO+1,FEEE (&3F10+1: es MEXT 1 SON VIDEO 
28020 FÜFE endrt,G:FUHE endrt+i,%40 # 
28030 CALL lectu 2000 


28040 bflen=25%6%(FEEFr Cendrt+1)-#40)+FEEr (endrt) 


28050 GOSUB 3000:G0SUB 8000: GOSUE 900€ 
28090 GOSUB 2000: GO0SUB 8000:GOSUE 9000 À MICRO 


28060 RETURN 


29000 ‘Ecrire le RPEMR AQUITAINE 


FOR 1=0 T0 6 


0 FOFE 2A040+1,FEEF C@TF 1041) 


29040 FOEE endrt,0 


ne THOMSON S 


2966 CALL ecris 


29070 bflens256+ (FER endrt+Lli-#40) PEER (endrt) Cr commodore 
29080 GOSUE 2000: G0SUB 8000: G0SUE 9000 


29090 RETUFN 
10000  Ilecure erftace 


10000 31, cours de l’Yser 
Zo010 FOLRE PALAG, 4C:GOSUR 28000: FUFE SAAB, #46: RETURN 33800 BORDEAUX 
TCOO 'ecris efface Tél.: 56.92.91.78 


21010 POLE SALE6 49: G0SUE 29000: FDKE SALES, 245: RETURN 
: ‘Changer donnees FDC 
LLSHS 


INFUIRZ, "numero de piste .!:",a$ 
IF agis"" THEN FOLE 825610, VAL("&"+a$) 


IHEUT#E, "numero de tete "ag 
IF ads" THEN FOFE %3F11, VAL ("Z"+a$) 


IHFUTHS, "numero de secteur :",a$ 

IF a" THEN FOUEE MIF 12, VAL (MR +a$) 
1IHFUT#:, "taille du secteur :",a$ , 

1F a$is"" THEN FÜFE &3F IS, VAL ("EE "+a%) 


INFUT#S, "jernier numero :",a$ 
IF ad" JHEN FULE #3F14,VAL ("8 "4a#) 
INFUTHTSS,"GAF #T 1",a$ 
IF ap::"" THEN FOHE REF18, VAL("&"+a$) 
INFUT#Z, "longeur 1",a$ 


IF a$::"" IHEN FOKHE &3%F16,VAL("?"+a4) 
SOSUR 70006 
SUSUE 11000 
RE TURN 
Fassage aù dump 
CALL 20000, 0,.10000, HIHEM 
MODE © 
GT) 100 
RETURN 
AAUOQ "Init. donnees FDC 
44010 FOFE 10, FECE (43400) 


36050 IF a$<>"" AND VAL ("&G"+a$)<21 THEN POKE 
LIFO1, VAL ("&"+a8):FOHE SAOAF, VAL ("&"+a$) 


ace PORE 8&2FL1, PEER CAC SOA OR ANUS, ARR 5", a% 
34010 FOKE 12, PEEK 26070 IF a$°:"" THEN FÜHE %iFO2, VAL ("&"+as#) 
dodo FOCE RÉFIS, FEEE 36080 INFUT#Z, "donnee 1",at 


T6070 IF af: "" THEN FOEE &IFOZ, Vél ('El+as) 
28190 GOSUB 10000: G)SUB 6000 

26110 GÜSUR 11000 

RETURN 

‘arret 


Liir SFA7E,0 


24050 FÜFE 
bb FOTE 15, %H 

34070 FÜLE 16,&FF 

.240B5 GOSUE 7ou0 

54080 RETURN 

35000 [nait donnees formatage £ 
25010 POLE RFO, ES2:POKE SIFOIRES " MUUE Li END 

ÉSO20 GUEUR JU RE TURR 

2SGTû RETUEN | 28000 ‘Lamarrage moteur 
28016 CALL Start 

28070 RETLEN 

329000 ‘Arret moteur 
27010 CALL stopn 

39020 KETUEN æ 


LEA, PEER. ( 


JeUûL changer donnees formatage 

Zôuiu CLSA 

ZAC INFUI#Z, "faille 1" at 

ReUTO IF ati:"" THEN FOFE BEF O0, VAL ("E"+a$) 
ZéGdo INFUT#:, "nombre secteurs :",a$ 
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Lorsque la presse anglaise emploie des mots 
tels que ephénomènal», emarquant», «idéal» et 
«avantageux», c'est qu'elle a, de toute évidence, 
découvert quelque chose de très spécial. Mais 
lorsqu'il s'agit d'un produit qu'elle connaît déjà par- 
faitement, alors cela doit être quelque chose de 
vraiment spécial. La raison de son enthousiasme 
C'EST L'AMX PAGEMAKER - un logiciel révolution- 
naire -qui permet la réalisation de journaux, affiches, 
prospectus, notices, communiqués - en fait, tout ce 
qui a trait au texte et aux graphismes et cela avec une 
qualité professionnelle extraordinaire. 


C'est un système intégré pour la conception de 
graphismes et de traitement de texte. Les graphismes 
sont en temps réel - avec défilement rapide de haut 
en bas et inversement pour un format de page À 4 
-et utilisent le Mode 2, la résolution graphique la plus 
fine sur ordinateurs AMSTRAD CPC. 


VOTRE ATTENTION S.V.P. 


Vous pouvez écrire le texte directement sur 
écran à l'aide des 16 types de caractères fournis ou 
dessiner votre propre modèle de caractères, au choix; 
vous pouvez charger la machine avec n'importe quel 
fichier ASCII ou fichier de traitement de texte, à partir 
de programmes tels que: Tasword, Amsword, 
Maxam, ou Protext, avec formattage complètement 
automatique du texte sur l'écran pendant le char- 
gement. 


LE PROGRAMME QUI FAIT LA 
UNE DES REVUES. 


Les fonctions de traitement de texte compre- 
nant le centrage, la mise en forme et la justification 
du texte sont disponibles. Est inclus un contrôle 
complet de la résolution d'image pour le texte et les 
graphismes ainsi qu'un système d'interlignage. 


UN PROGRAMME EXTRA 


il offre des possibilités extraordinaires pour le 
dessin, le spraying et la peinture en utilisant soit les 
modèles fournis ou réalisés par vos soins . Un pro- 
gramme de conversion d'écrans permet que des 
écrans créés en Mode 1 et 0 soient utilisés dans le 
Pagemaker. Sont inclus dans le système les fonctions 
couper et coller, transcription, déplacements, rota- 
tions, dimensionnements, ainsi qu'un ZOOM fantas- 
tique. 


L'écran vous permet de visionner trois pages 
de format A 4 à tout moment avant que le travail soit 
sorti sur une gamme importante d'imprimantes telles 
que: Amstrad DMP 2000, Epson FX/RX/LX/LQ, 
Canon PW 1080, Kaga KP 810, Mannesman Tally 
MT-80 +, Seikosha SP-1000 A, Star Delta, Star SGLO 
ou toute autre, compatible avec le matériel décrit 
ci-dessus. 


L'AMX Pagemaker nécessite : a) l'Amstrad 
CPC 6128 ou b) l'Amstrad CPC 664 + 64 K minimum 
d'extension Ram ou c) l'Amstrad 464 + 64K + un 
lecteur de disquettes (cartes d'extension DK'tronics, 
Vortex ou compatibles). 


Laissons le dernier mot à la presse : 

* Le Pagemaker est phénoménal - il est pro- 
pice à la création lorsque l'on souhaite avoir du texte 
et des graphismes -notices, affiches, prospectus, 
communiqués, feuillets. Ce programme qui était du 
domaine des micros 16-bit jusqu'à maintenant est 
devenu accessible à un prix vraiment avantageux». 


L'AMX, MAGAZINE MAKER : 
Nous avons pensé qu'il était 
temps de vous introduire à l'image 


C'est une combinaison entre l'AMX PAGE- 
MAKER et le DIGITALISEUR VIDEO AMX. En utilisant 
n'importe quelle source vidéo qui fournit un signal 
combiné et le digitaliseur, les images envoyées à 
partir d'une caméra’ ou d'un poste de télévision peu- 
vent être converties en images graphiques sur l'Ams- 
trad. Puis elles peuvent être utilisées par l'AMX 
Pagemaker pour illustrer des périodiques ou des bul- 
letins. Le digitaliseur est connecté à la borne 
d'extension et balaye une image complète en 5 
secondes seulement. 


Un programme spécial de dumping de 
l'imprimante est inclus dans la disquette. || est spé- 
cialement conçu pour produire rapidement des 
images correctement proportionnées avec un 
minimum de halo ce qui donne une reproduction très 
nette de l'image. 


* «Educational Computing» Janvier 1986. 
* Ces prix sont des prix conseillés. 


Les caractéristiques de ce système de digitali- 
sation sont les suivantes : 
® Résolution : 256 par 256 points 
® Un convertisseur 10 bit A/D qui donne 32 tons 
gris en sortie 
® Aucune source d'alimentation externe n'est 
requise. 


Ce système est pour vous l'occasion de vivre la 
véritable révolution qui s'opère dans le domaine de la 
publication électronique. 


Le prix de l'AMX PAGEMAKER est de seule- 
ment 550 FTIC * ; les programmes sont fournis sur 
disquette 3" ainsi qu'un manuel d'utilisation illustré 
en français; le prix du DIGITALISEUR AMX est de 
1 _040F TIC x et comprend les programmes sur 
disquette 3”. L'AMX MAGAZINE MAKER (compre- 
nant le Pagemarker AMX et le Digitaliseur AMX) est 
au PRIX DE 1 FTIC *. 

DEMANDEZ DES AUJOURD'HUI, CHEZ VOTRE 
REVENDEUR 


AMX PAGEMAKER 


DISTRIBUTION EXCLUSIVE EN FRANCE 


205, rue du Fg. Saint-Honoré 


75008 PARIS 
Tél. : (1) 42.89.37.26 + 


W ! 


N G S  Microelectronics Distribution 


TESTS DE PRODUITS 
NOUVEAUX SUR PCW 


TELE TUTOR CLAVIER 
DE TOTALE FORMATION 


Dire que le PCW est une machine de trai- 
tement de texte et que, depuis.le temps 


que je pianote sur mes AMSTRAD, je ne. 


sais toujours pas taper à la machine ! Je 
reste émerveillé devant ces secrétaires 
qui tapent à toute vitesse, avec tous 
leurs doigts, et en contemplant le pla- 
fond ! Mais, aujourd'hui, j'ai essayé TELE 
TUTOR CLAVIER. On peut craindre l’en- 
nui et le travail fastidieux des méthodes 
traditionnelles de dactylographie, mais ce 
logiciel d'apprentissage de la frappe est 
fabuleux ! 

L'apprentissage s'effectue en deux éta- 
pes : clavier et vitesse. Dans la première, 
40 exercices de 10 lignes vous sont pro- 
posés. après un bon positionnement de 
vos mains sur le clavier, le dessin de vos 
mains apparaît à l'écran. La lettre à taper 
se met à clignoter. L'acrobatie à réaliser 
à l'aide du doigt concerné est imagée : 
pour atteindre les rangées supérieures, 
inférieures ou latérales, le doigt s’allonge, 
se recourbe ou se tord. L'erreur éven- 
tuelle apparaît en vidéo inverse et la cor- 
rection apparaît sur le bon doigt. Une fois 
une ligne réussie, on peut la recommen- 
cer sans le dessin des mains (dur, dur...), 
ou passer à un autre exercice. L'objet de 
la seconde partie est la frappe de textes 
inclus dans la notice d'utilisation. Le tra- 
vail consiste à reproduire exactement le 
texte, avec espacement, interlignes et 
ponctuations (il faut même frapper les 
retours-chariot, alors que cette peine 
vous est épargnée dans tous les traite- 
ments de texte !). Avec un rythme de tra- 
Vail relativement intensif (une heure ou 
deux par jour), vous parviendrez à taper 
jusqu'à 20 mots/minute en 20 heures. 
Ce logiciel permet de maîtriser un clavier 
AZERTY. On regrettera ici les quelques 
écarts du clavier par rapport aux bons 
vieux claviers français (signes de la ran- 
gée supérieure, et de la droite du clavier 
alphanumérique). L'autocorrection des 
exercices en temps réel et le graphisme 
des doigts sur le clavier, très agréable, 
sont les atouts majeurs de ce genre de 
méthode. Un PCW, tout pour faire une 
parfaite dactylo ! 
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Noël LAGNEU 


THE ELECTRIC STUDIO PEN 
CRAYON OPTIQUE POUR PCW 


Après avoir sévi sur CPC, Electric Stu- 
dio récidive en adaptant son crayon opti- 
que aux PCW. Il est livré avec une notice 
français-allemand (crayon optique s'y dit 
Lichtgriffel ! - le stylo et son interface) 
et une disquette programme. 
L'installation de l'interface sur le bus 
d'expansion du PCW se fait très facile- 
ment. Un détrompeur permet de ne pas 
risquer d'endommager le PCW par un 
positionnement à l'envers de l'interface. 
Il'est possible de connecter par dessus 
d'autres extensions, l'interface série 
AMSTRAD, par exemple. Il ne reste plus 
qu'à enlever le bouchon de protection du 
stylo pour le faire fonctionner. Toutefois, 
un réglage de la luminosité du récepteur 
peut être nécessaire. 

La disquette programme contient, outre 
un driver GSX dont nous reparlerons, et 
quelques démonstrations, le programme 
‘’ARTF"’ de DAO en lui-même, entière- 
ment francisé. Après son lancement, un 
menu de 12 options est affiché à gau- 
che de l'écran. On sélectionne une option 
en la pointant avec le stylo optique. Elle 
apparaît alors en vidéo inverse et on la 
valide par une pression sur la touche 
ESPACE. Un sous-menu associé à ce 
choix apparaît alors, et la sélection dans 
le sous-menu s'opère de la même 
manière. Ce programme est bien sûr très 
complet, et permet entre autres : 

— le stockage et le chargement d'écrans 
sur disquette, 

— de multiples copies d'écran sur impri- 
mante (petit ou grand format, simple ou 
double densité, vertical...), 

— le tracé de segments, de polygones, 
de rayons..., 

— le dessin à l’aide de crayons, pinceaux 
ou pistolets de différentes tailles. Le posi- 
tionnement très précis des points écran 
désirés peut se faire à l’aide des touches 
curseur du clavier, 

— le remplissage de formes quelconques 
à l’aide de plus de cinquante textures dif- 
férentes, 


— le déplacement de zones, la copie et ” 


le zoom, 
— l'inversion des couleurs fond et encre, 


— les tracés de triangles, rectangles, 
ellipses, pyramides ou cuboïdes, 

— l'écriture de textes, dans tous les sens 
et de toutes les tailles. 

Mis à part ce programme de dessin, com- 
ment utiliser ce stylo ? Le concepteur 
nous donne un driver GSX. L'utilisation 
avec les programmes interfacés TSX en 
est très simple : prenez DR DRAW ou DR 
GRAPH, remplacez le fichier DDSCREEN 
par le fichier DDESP (venant de votre dis- 
quette stylo optique) dans ASSIGN.SYS, 
et le tour est joué ! Toutes les entrées 
curseur sont alors gérées par le stylo 
optique. Le Basic GSX supporte aussi 
cette extension, mais le client n’en est 
pas avancé pour autant ! À quand un 
manuel d'utilisation clair et précis de 
GSX ? 


En résumé, la qualité du dessin est aussi 


impressionnante que l'ergonomie du pro- 
gramme. Le PCW s’'accommode ainsi 
très bien de son absence de couleurs, et 
met ainsi à profit sa haute résolution. Un 


Topersial S0FQuare Systems Germany 
Gardes KG 


Enfin arrivés Ë Rochus-Center 
__ d'Allemagne : És D-5300 Bonn 1 


s À 
qur le marché é franges À West-Germany 


en langue française 


CPC-MousePack 


contient une souris de précision 
un adaptateur 
une documentation détaillée 
une disquette 3” 


Les programmes livrés ensemble avec la 

souris vous permettent de l’utiliser pour 

vos propres programmes ainsi que pour 

le système CP/M ou pour une parfaite ANR 

réalisation de graphiques. 2 CPC- 
Le CPC-MousePack est le système D. E MousePack 
souris le plus vendu en Allemagne. RE 890ff 


Compilateur de BASIC “Typhon’” 


Selon l’opinion unanime des magazines allemands spécialisés en informatique, le 
“Typhon” est un des programmes les plus importants pour le CPC. 


— le programme objet est jusqu’à 100 fois plus rapide que le programme BASIC. 
le compilateur peut comprendre plus de 30 instructions supplémentaires 


Le “Typhon” est le leader des compilateurs de BASIC cassette: 290 ff 
pour le CPC en Allemagne disquette: 340 ff 


Autres produits d’Imperial SOFTware Systems 


— programmes utilitaires pour disquettes 
— MACRO-Assembleur 

— Layout-CAD 

— PCW-Mouse 


Pour des informations plus détaillées et des commandes s'adresser aux revendeurs 
de logiciel en France ou directement à: 


Toperial SOFGuare QSustens Gardes france 
54 Avenue de la Paix F-57520 Rouhling Tel. 87092414 


reproche toutefois à faire au stylo opti- 
que : l'absence d'interrupteur sur le stylo 
oblige la validation par la touche espace 
et le changement d'option par la touche 


STOP. Malgré son prix élevé (plus du 
double de celui des CPC), cet ensemble 
est l'outil de dessin par excellence du 
PCW. 


FICHE DE ELP 


Une nouvelle gestion de fichiers pour 
PCW vient compléter la liste déjà impo- 
sante de ces utilitaires. Son originalité et 
son intérêt résident dans sa présentation 
et son maniement style LOCOSCRIPT. 
Aucun dépaysement par rapport au célè- 
bre traitement de texte : les 3 lignes de 
choix en haut de l'écran, les sous-menus 
apparaissant en fenêtres et dans un gra- 
phisme venu de LOCOSCRIPT, utilisation 
des touches de fonction et des touches 
de validation + et — ‘entourant la barre 
d'espace, 3 modes de travail. 


Trois modules principaux sont présents : 
— La description des fiches. Elles doi- 
vent tenir dans un écran PCW. On y défi- 
nit le nom des zones, les zones elles- 
mêmes en alphanumérique où numéri- 
que, et les cadres regroupant certaines 
zones. Ces derniers rendent la fiche plus 
lisible, et influent sur l'ordre de saisie des 
zones dans la fiche. Réfléchissez bien 
avant de construire ce descriptif, la 
structure du fichier associé ne peut plus 
être modifiée ! Les clés de recherche sont 
aussi définies ici et peuvent être consti- 
tuées de plusieurs zones. 

— La gestion des fichiers. On y saisit les 
fiches, on les modifie ou on en supprime. 
La consultation du fichier se fait d'abord 
à partir d'une clé de recherche, puis 
séquentiellement où à partir d'une autre 
recherche. 

— L'impression des fichiers. Plusieurs 
états peuvent être définis : standard, 
dans lequel les fiches sont imprimées 
comme on les voit à l'écran ; en étiquet- 
tes dont on donne une description très 
complète des zones, et où on peut utili- 
ser les attributs des pas de caractères 
différents et de corps gras ; autres for- 
mats, avec description totale de l'état 
désiré. L'impression se fait entre deux 
fiches déterminées par clés et suivant un 
tri sur la ou les clés voulues. 

On peut remarquer quelques manque- 
ments : les clés doivent être exactes (pas 
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de jokers ou de comparaisons), la liste 
des fiches, des clés ou des états n’est 
pas prévue et aucun interfaçage n'est 
prévu avec d'autres logiciels. De plus, le 
Basic reste souvent très lent, mais une 
version beaucoup plus rapide de ce logi- 
ciel devrait être bientôt mise sur le mar- 
ché. 

Malgré ses quelques petites imperfec- 
tions facilement réparables, son look 
LOCOSCRIPT confère à ce logiciel un 
charme certain. Il est à réserver aux uti- 
lisateurs ayant des fichiers relativement 
statiques à gérer. 


NOTE SUR LE 
"LIVRE DU PCW" 


Suite à un important courrier au sujet du 
livre de Patrick LEON, nous apportons les 
quelques éléments de réponse suivants : 
certains lecteurs se plaignent du non- 
fonctionnement des programmes. Ceci 
est toujours consécutif à une mauvaise 
saisie des codes machines proposés, et 
ne met pas du tout en cause la validité 
des programmes. Toutefois, une erreur 
s'est glissée dans le listing du premier 
programme BINAIRE.BAS le code 
binaire est valide, mais le contrôle des 
erreurs par checksum ne fonctionne pas. 
Il faut donc remplacer GOTO 520 en 
ligne 490 par GOTO 510. Il restera très 
difficile et relativement laborieux de bien 
sajsir tous les programmes de l'ouvrage. 
Vous pourrez vous procurer la disquette 
programme de ‘L'univers du PCW" 
auprès de l'éditeur ou de CPC, au prix de 
150 F. Ceci est un simple conseil pour 
ceux qui se découragent facilement et 
n'arrivent pas à trouver les erreurs de sai- 
sie. 


QUICK MAILING 
DE TELESOFT 


Première approche de mailing avec 
LOCOSCRIPT sur PCW, ce programme 
permet la gestion d'un fichier client, avec 
des possibilités de recherche, de tri et de 
sélection élaborées. Son association 
avec un document issu de LOCOSCRIPT 
permet ainsi le courrier personnalisé. 
Malheureusement, la mention LOCO- 
SCRIPT est nettement optimiste : seuls 
les fichiers ASCII créés par la version 
1.21 sont traités. Finies les fioritures 
(gras, pas de caractères non standards, 
italiques, centrages, etc.). N'importe quel 
autre éditeur de fichiers ASCII ferait aussi 
bien l'affaire ! À quand un driver d'im- 
pression des fichiers LOCOSCRIPT sous 
CP/M ? 


OPTICAISSE 
DE OPTIMA CONCEPTS 


Sélectionné par AMSOFT dans son cata- 
logue, ce logiciel permet la tenue d’un 
livre de caisse avec édition de tickets. 
Très complet, il autorise entre autres : 
— la gestion des acomptes, avoirs, mou- 
vements de caisse, modes de règlement, 
— la protection par mot de passe des 


chiffres d'affaires cumulés, des mises à 
jour et des restaurants, 

— la gestion de tickets de caisse person- 
nalisés avec raison sociale du commer- 
çant, lignes publicitaires et 15 articles par 
ticket. Le listing est double, de largeur 
10 cm (0,20 F par ticket environ), 

— les clôtures hebdomadaire et men- 
suelle avec édition d'un journal de caisse 
très complet. 

Très simple d'utilisation, ce logiciel nous 
paraît être un outil puissant pour tous 
commerces non alimentaires (habille- 
ment, restauration, fleuriste..). Une 
configuration PCW-OPTICAISSE sup- 
porte largement la concurrence d'une 
caisse enregistreuse, en nettement 
moins cher. 


VOTRE NOUVEAU 
SPECIALISTE 
AMSTRAD 


En plein centre-ville 
Parking assuré 
20, rue de la Gare 
62300 LENS 


Tél. 21.28.42.24 


Si vous avez l'intention de CREER 
ou si vous avez déjà créé 


VOTRE BOUTIQUE INFORMATIQUE 


regoignez nous avec la franchise 
SON VIDEO 2000 et devenez un 
distributeur POINT MICRO pour 
MOINS DE 20 000 Frs !11 


DISTRIBUTEUR AGREE AMSTRAD, COMMODORE 
ATARI,ORIC et COMPATIBLES ÊC . 


RENSEIGNEMENTS 
56 92 91 78 


STRUCTURE DU BASIC 
MALLARD SOUS CPM 3.0 


Noël LAGNEU 


ous allons ici discuter de quelques particularités du Basic 

Mallard sur PCW. La structure des lignes d'instructions et des 

tables de variables sont exposées, ainsi que la liste complète 
des tokens Basic. Quelques exemples en illustrent l’emploi. 


ORGANISATION INTERNE 


Le Basic Mallard lancé sous CP/M 3.0 
dispose d'une zone de mémoire libre de 
31597 octets, et la limite haute de la 
mémoire accessible est 62581. Le pre- 
mier octet de codage des lignes Basic se 
trouve en 31382. Un programme Basic 
est stocké sous forme de lignes codées. 
Il est directement. suivi par une zone 
appelée zone variable. La description de 
ces deux zones nous permettra de mieux 
comprendre le fonctionnement de l’inter- 
préteur. 


TABLE DES VARIABLES 


Elle est construite au fur et à mesure de 
la rencontre des nouvelles variables par 
l'interpréteur. Sa structure est la sui- 
vante, pour chaque variable : 
— Nom de la variable, codé en ASCII. Le 
dernier octet du nom a son bit 7 mis à 
1 (on. lui a ajouté 128). 
— code variable. || peut être : 

1 : variable entière 

2 : variable chaîne 

3 : variable réelle 

7 : variable double précision 
— Les octets suivants dépendent du 
type de variable. Pour les entiers, les 
deux variables suivantes donnent la 
valeur binaire. Pour les réels ou double 
précision, les 4 ou 8 octets suivants don- 
nent la valeur en virgule flottante. Pour 
les chaînes alphanumériques, l’octet sui- 
vant contient la longueur de la chaîne, 
et est suivi par l'adresse de stockage 
effective. 


Dans tous les cas, la fonction VARPTR 
vous donne l'adresse de l'octet suivant 
le code variable. Prenons l'exemple sui- 
vant (Listing 1) 

10 abc%-1 

20 chaîne$ = ‘toto’ 
VARPTR(abc%) vaut après exécution 
31424. Vérifiez que ‘'abc'’ est bien 
stocké de 31240 à 31422. 
PEEK(31423) vaut 1, variable entière 
codée ensuite sur deux octets. De 


même, VARPTR(chaîne$) vaut 31437 et 
on peut effectuer les mêmes vérifica- 
tions. 


DESCRIPTION DE 
LA ZONE PROGRAMME 


Tout programme basic installé en 
mémoire possède une structure par ligne 
que nous allons examiner. On doit 
d'abord élcaircir un point : les mots-clés 
du Basic ne sont pas installés tels quels 
en mémoire (5 lettres pour PRINT, 9 pour 
RANDOMIZE...), mais sont codés sur un 
ou deux octets qui sont appelés TOKENS 
de la fonction. Vous trouverez ici la liste 
complète de cette table de codage pour 
le Basic Mallard, et un exemple d'utilisa- 
tion. 


Chaque ligne d'instructions possède la 
même structure en mémoire centrale. 
Longueur, numéro de ligne, instruc- 
tions. Un exemple vaut mieux qu'un 
long discours. Prenons le programme 
précédent. Le codage commence en 
31382 : 

Adresses 

31382-31383 Longueur 13 octets 
31384-31385 Numéro de ligne 10 

31386 Code variable entière 2 
31387-31388 Longueur du nom de variable + 4 


31389-31391 Nom de variable (a b c+ 128) 
31392 &hEC Token de “=” 

31393 Codage de la valeur numérique 
31394 0 de séparation 


31395-31396 Longueur 21 octets 
31397-31398 Numéro de ligne 20 

31399 Code variable chaîne 3 
31400-31401 Longueur du nom de variable + 4 
31402-31407 Nom de variable 

31408 &hEC Token de "=" 
31409-31414 Valeur de la variable (y compris”) 
31415 0 de séparation 


Code variable : il peut être de 4 pour les 
réels, 2 pour les entiers, 5 pour les dou- 
ble précision, 3 pour les chaînes et 13 
pour les types numériques non fixés. 


Codage numérique : les valeurs numéri- 
ques de O à 9 sont codées par un octet 
de 14 à 23. Les valeurs de 10 à 255 sont 
codées sur deux octets, ‘’24'' et valeur. 
Les valeurs entre 256 et 65535 sont 
codées sur 3 octets, ‘’25'’ et 2 octets 
de valeur. Au-dessus et pour les réels, 
il faut 5 octets : ‘30’ et quatre octets 
de virgule flottante. 


Rien ne vaut l'expérimentation. Essayer 
de taper d’autres lignes de programmes, 
et de comprendre ensuite la structure de 
ligne, en changeant aussi les instruc- 
tions ! 


APPLICATION 


Les applications possibles de la manipu- 
lation des tokens Basic sont multiples. La 
modification du programme par lui-même 
à l’aide de POKESs est souvent utilisée 
pour la protection des programmes 
(impossibilité de lister...). Nous en don- 
nerons ici une application simple, mais 
instructive. 


Lors de l'exécution d'un programme 
Basic, l'ordre PRINT dirige les sorties vers 
l'écran, l'ordre LPRINT vers l'imprimante 
et l'ordre PRINT # vers le fichier ouvert. 
La manipulation que nous envisageons 
est de rediriger les sorties : le programme 
initial est écrit avec sortie console, et 
quelques POKESs à l'endroit des PRINT 
permet, suivant le cas, d'utiliser n'im- 
porte quel périphérique de sortie. Le lis- 
ting Basic DEMTOKEN.BAS en donne un 
exemple. Le saut en 1000 permet d’ins- 
taller en mémoire les tokens voulus. La 
difficulté est bien sûr de retrouver tous 
les PRINT du programme (adresses des 
poke de 1040 à 1050). Mais avec un 
peu d'organisation, ceux-ci peuvent être 
par exemple toujours positionnés en 
début de ligne, et la numérotation per- 
mettra rapidement de retrouver tous les 
tokens &hB3 du programme. Nous lais- 
sons à votre imagination le soin d'amé- 
liorer cette méthode, et de trouver dé 
nouvelles applications ! 
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Listing de DEMTOKEN,BAS 


100 ' 

110 INPUT " Non du fichier ASCII : ",fic$:OPEN “o",1,fic$ 
120 ‘ 

130 ‘ Denonstration d'utilisation des tokens 

140 

150 INPUT " Chaine desiree : ",a$ 
160 INPUT * Sortie desiree ( l'imp 
165 IF dà=4 THEN CLOSE(1):ST0P ELSE GOSUB 1000 
210 PRINT " Test de deroutesent en sortie * 
220 PRINT " * 

230 PRINT a$ 

240 607 140 

1000 ON df: 6070 1010,1020, 1030 

1010 octl%=4HA6:oct28=8H20:60T0 1040 

1020 octl4=&HB3:oct24=8H20:607T0 1040 

1030 octi%=8HB4:oct2%28HF :G0TD 1040 

1040 POKE 31636 ,oct1£:POKE 31637 ,oct24 

1045 POKE 31676,oct1%:POKE 31677,0ct24 

1050 POKE 31687,oct14:POKE 31688 ,oct2% 

1100 RETURN 


TOKENS BASIC CODES SUR UN OCTET 


80 AUTO AO KILL CO RETURY EO STEP 

81 CALL A1 LET C1 RSET E1 TAB 

82 CHAIN A2 LINE C2 RUN E2 THEN 

83 CLEAR A3 LIST C3 SAVE E3 TO 

84 CLOSE A4 LLIST C4 STOP E4 USING 

85 COMMON A5 LOAD C5 SAP E5 USR 

86 CONT A6 LPRINT C6 SYSTEM E6, VARPTR 

87 DATA A7 LSET C7 TROFF E7 HIMEM 

88 DEF A8 MERGE C8 TRON E8 OSERR 

89 DEFDBL A9 MIDS C9 WAIT E9. ve 

&A DEFINT AA NAME CA WEND EA -- 

8B DEFSEG AB NEXT CB WHILE EB 

8C DEFSNG AC NEV CC WIDTH EC 

8D DEFSTR AD ON CD WRITE ED > 

8E DELETE AE ON ERROR 60T0 CE VWRITE # EE 

8F DIM AF OPEN CF MEMORY EF < 

90 DIR BO OPTION DO DISPLAY FO < 

91 EDIT B1 OUT D1 CREATE F1 

92 ELSE B2 POKE D2 OUTY F2 

93 END B3 PRINT D3 TYPE F3 

94 ERA B4 PRINT # D4 WAITW F4 

95 ERASE B5 PUT D5 ZONE F5 

96 ERROR B6 ‘ D6 BUFFERS F6 

97: FIELDS B7 RANDOMIZE D7: == F7 AND 

98 FILES B8 READ D8 -- F8 EQV 

99 FOK B9 REM D9 ALL F9 IMP 

9A GET BA REN DA AS FA MOD 

9B GOSUB BB RENUM DB BASE FB OR 

9C GOTO BC RESET DC ERL FC XOR 

9D IF BD RESTORE DD ERR FD NOT 

9E INPUT BE RESUME DE FY FE: = 

9F INPUT # BF RESUME 0 DF SPC FFE 
TOKENS SUR 2 OCTETS FF 
S=SS=22SS=2=====2=2======2=== 

01 ABS 14 LOF 27 INPV 6F SEEKRANK 

02 ASC 15 LOG 28 STRIPS 70 SEEKREC 

03 ATN 16 LOG10 29 VERSION 71 SEEKSET 

04 CDBL 17 LOWERS 2A CVIK 72 DECS 

05 CHRS 18 LPOS 2B CVUK 73 FINDS 

06 CINT 19 MKDS 2C MKIKS 74 HEXS 

07 COS LA MKIS 2D MKUKS$ 75 INKEYS 

08 CSNG 1B MKS$ 63 CONSOLIDATE 76 INPUTS 

09 CVD 1C PEEK 64 RANKSPEC 77 INSTR 

OA CVI 1D POS 65 ADDKEY 78 LEFTS 

0B CVS 1E SNG 66 ADDREC 79 MAX 

OC EOF 1F SIN 67 DELKEY 7A MIN 

OD EXP 20 SPACES$ 68 FETCHKEYS 7B OCTS$ 

CE FIX 21 SQR 69 FETCHRANK 7C RIGHTS 

OF FRE 22 STR$ 6A FETCHREC 7D RND 

10 INP 23 TAN 6B LOCK 7E ROUND 

il INT 24 UNT 6C SEEKKEY 7F STRINGS 

12 LEN 25 UPPERS 6D SEEKNEXT 

13 LOC 26 VAL -6E SEEKPREV 


2:con 3:fichier 4:fin ) : ",dà 


NU HUNV AU 


J 


BASIC 
MALLARD 
SUR 6128 


Attention, ces lignes ne s'adressent qu'aux possesseurs d'un 
CPC et d’une licence d'utilisation du Basic Mallard sur PCW ! 
Nous vous proposons d'installer sur l’un le basic de l'autre. 


Les avantages du Basic Mallard sur le Basic Locomotive des 
CPC est indéniable sur certains points : gestion des fichiers 
à accès direct, des fichiers indexés avec JETSAM, double pré- 
cision, possibilités d’autostart, qualité de la protection basic 
par cryptage, utilisation de logiciels ou sonores bien sûr. Cha- 
que application trouve donc son basic le plus adapté. 


Le CPC étant branché, on se place sous CP/M 2.2 ou sous 
CP/M 3.0 avec un CPC 6128. Le fichier BASIC.COM du PCW 
a été auparavant copié sur une disquette (formatée sur CPC) 
à l’aide de PIP. Avant utilisation, vous devrez réadapter le cla- 
vier de votre CPC. A cette fin, vous créerez le fichier KEYS.BS 
donné plus loin à l’aide d'un éditeur quelconque. Dès lors, l'ins- 
tallation du Basic se fait par les deux commandes suivantes : 

A> SETKEYS KEYS.BS 

A> BASIC 


Sous CP/M 3.0 il vous reste, en conditions normales, 31597 
octets libres, exactement comme sur le PCW. Sous CP/M 2.2, 


ilne vous reste par contre que 9325 octets, ce qui limite l'in- 
térêt dé la manipulation. 


0 X “ 1 u 
L 3 #1 
8 NH "ta" 
2. rip 
66 N "1c" 
16 K "+1G" 
9 X Qi +H" 


SUPER-PROMOTION 


Amstrad 
CPC 6128 


CPC 6128 couleur 
+ imprimante 
DMP 2000 


CPC 

CO cpc 464 couleur . ......... 3890 F 3590 F 
D cpc 464 monochrome . ...... 289 F 2390 F 
CO cpc 6128 couleur . ........ F4790 F 
OU cpc 6128 monochrome . ..... F3590 F 


imprimante DMP 2000 .... 
interface RS 232 (Amstrad) 
souris 


D joystick compétition PRO 5000 
7 disquette vierge 3 pouces... 


O 1er lecteur de disquettes. 

[1 2ème lecteur de disquettes. ............ 1590 F 
cordon 2ème lecteur disquette. ........... 150F 
magnétophone (avec câble) 340 F 

_] câble magnéto ............... 56F 

Rallonge alimentation + vidéo 
ne soyez plus collé à l'écran, rallonge. 464 130 F 

D ne soyez plus collé à l'écran, rallonge. 6128 180 F 

L] housse pour moniteur + clavier ............ 175F 


éci [ DC. 
Cassettes vierges C20 {préciser couleur ou monoc.) 


Imprimante CITIZEN 1200 
120 CPS - matrice 9 x 9 
3 ex. compatible EBSON - garantie 2 ans - 
tronic intégrée. 


- traction ou friction - 


El'eftèen 120D.:.5 sisi antes 2490 F 
Produits DK TRONICS 
Extension 64 K : 
D pour 464-664........................ 599 F 
extension 256 K.ROM 
O pour 464-664....................... 1199 F 
Dipour 6128: sumccecessnerenenses 1199 F 
extension 256 K. silicon-disk 
D pour 464-664....................... 1199 F 
À pour B128......rscercorsesesomsss 1199 F 
stylo optique 


© pour 464-664 en cassette. ............. 
© pour 464-664-6128- en ROM 
synthé vocal 

D pour 464-664 en cassette. ............... 

À pour 464-664-6128 en ROM............. 490 F 


COMMENT COMMANDER : Cocher les) ar article(s) désiré() où ou fates- en une iste Sur une feuille à part - | Faits le total + frais ee port + (20 Fp pour achats » inbltiours à à ; 500 F, 40 Fi de 500 à 1000 F, 60 F pour achat supérieur à 1000 A. 


NOM 


6290 F 


jusqu'à 
interface cen- 


22, rue de Montreuil 94300 VINCENNES -— Tél. : (1) 43.28.22.06 


OUVERT DU MARDI AU VENDREDI de 10 h 30 à 13 het de 15 h à 19 h, LE SAMEDI de 10 h 30 à 19h 


REVENDEUR OFFICIEL AMSTRAD FRANCE 


LOGICIELS CPC 


e 
e. 
G D e 
C D hercules: Ride — D250F © 
HAND: 55 ue Shure C100F — infirator rss eee à 115F0165F © 
COMIL es Se Re D145F0195F l'affaire sydney . . . ...... 150F01199F @ 
master tronic n° 1 ....... C] 99F l'affaire vera cruz. . . .. ... 165F[01199F e 
master tronic n° 2 ....... — OO 99F l'ère du verseau. . ....... — [250F e 
master tronic n° 3 ....... — D 99F l'héritage ............ 165F01199F ï . 
ikari warriors . . ........ O100F0155F la geste d'artillac . . ...... 255F01255F € 
les passagers du vent. . . ... O299F0299F le5°axe. ............ 120F0160F +. PCW 
RMRite ss csdsame see O299F0299F Le diam. de l'île maudite . . .. 180F0220F + 
highlander. ........... O100F0145F lepacte ............. _ 20F DOM O6 sir ésrncsrisseriisenes 5925 F 
silent service . . ........ 0105F0155F le secret du tombeau . . . . .. 160F0199F & LIPCW 8512 .....….. 7690 F 
street hawk . .......... O105F0150F les 4 saisons . ......... 120F0220F & ext. 256 K pour 8256....... .450 F 
UN SP EN O105F0155F les mines du roi aquantus. . . . 125F0185F 4 2% lect. pew 8256......... 
america's cup chall.. . . .... O0105F0155F  lightforce............ D105F0160F , O stylo optique ........ 
AVORQET : : : 555% See TODFETTIABE, MGR: 2-8 0 soeur 140F0180F interf. RS 232/centronic . à: 
demain holocauste . . ...... - O235F mg. + bactron. . ....... 195F0245F *  Chousse (mon. + clavier + imp. 299 F 
CODTR:. > 25 us monte 95FD145F magmax............. 110F0165F ruban imprimante (par 2) .. 
3,d grand prix. ......... 110F0165F  mandragore. .......... 255F01255F © disquette 3” (DF-DD) ..... EP 
4% protocole. .......... 195F01195F  maracaïbo. ........... D135F0175F ®  Callonge pcw (imp. + al)........... 275F 
amstradeus ........... 0490 F0570F masque ............. - 0195F ®% 
BSphall 55... ee ons 0140 F01180F meurtre à gde vitesse. . . . .. 180F0240F © 
autof. à l'assembl.. . . . .... 0195F0295F meurtre sur l'atlantique. . . . . 199F0260F ® 
Daction 5 nd nee 0140F0180F  miami vice. . .......... 100F0150F © 
balade au pays big ben. . ... O180F01250F micro scrabble. . . ....... O195F01245F € 
billy la banlieue . . . . ..... 140F0199F mission delta . . ........ 120F0199F © 
bob winner ........... — ÙÜ180F monopoly ............ Ü180F01290F e 
boulder dash 3 ......... O100 FC 150F:. naker. : 54424 540.004 [110F0190F e 
bridge = 55 cs sis 255F01290F nuclear defence. . ....... 110F01190F © TIRVITT2 
Bruce les: "sus ire 110F0160F oddjob.............. El 200F € Esthétique, robuste, pratique le TIRVITT 2 vous séduira ! 
budget familial . . ....... 0140 F01220F omega planète invisible. . . . . 255F01255F € Contacts par micro-switches, un contacteur sous le 
eu Do Qi nsinr 320FC01410F  pédagociciel (an. compl) . . .. [3720 F[1720F +. ne le choix 4 ou 8 directions. 
calcumat... .:. 52:00 450F ping-pong. ........... 100 FOMGSE à ENPIAVITT 2. nn deesunesae due tes 150F 
cé cp, :- esse —. OM80F.  prodigy +: 355 508 120 F0160F : é 
cobra pinball . ......... 140F0220F rally2.............. 160F01199F + FR lala ee 
d'hase ll... 4: — 190/P:: robbot:. 2: aitu 130F0175F + 
DAMES 5 ce os O295F0395F sapiens ............. 140F01180F e 
dandare 2315856 Ot10F0175F" shegun:..........43., 115F0165F 
data mat. ............ — D450F skyfox.............. TOFDI65F © DD 
deactivators. . ......... O110F0165F space moving . ......... 295F01395F © 
deep strike ........... O120F01170F  spitfire 40............ 105F0170F ® 
division blindée . . . ...... CSD FOTOS SM: 2 555 sets à = 180F ® 
drdraw............. - O49F: ‘tempest:::........ 0 120F0160F ® 
CA LL RIRE —_\D649F /fension: 45. us 150F0190F © “I ne lui manque que la parole”, synthé. VOC1 la lui donne ! 
explorer.3:::.;: :.:.,::. = 280 F thanatos . nssssesesese 105F0165F © Très performant ce synthétiseur vocal va vous permettre 
fer et flammes ( 2 dsq.). . . .. : 295F sold a million [La Tasse 110F0170F © de rendre votre ordinateur plus bavard qu'un politicien en 
MAO ns eee Cure à = 200F sold a million (n° 2). ...... 110F0170F © campagne! 
fight. War. + Way ex... .... _ 240F sold a million {n° 3). ...... 110F0170F 80 synthétiseur vocal (prog. sur cassette). 
Éctghs SN a US DATE Ré _. ES LL L ans MERS 120F hs ; © C synthétiseur vocal prog. sur disquette) 
OO uen ce steel op secret :.: 2:54 = e 
DAIVAR 55 te vd O110F0180F trail blazer. . .......... L1110F01160F e 
glider rider. . . ......... D100F0145F  translock. ............ 150F0185F e Uy 
graphic city . .......... C150F01195F transmat............. O1150F01185F €. EAU MODÈLE 
gunf. + way tg. + visi.. . . .. 145F01195F trivial pursuit . . . ....... 0199F01259F + 
himiscobra 2: 2 a à 180 F = winter games . ......... = 180F - 
hms:cobra : :. 4, — 2AOE-" 2ombI 52 ie En = 180F 


Cinterface T.V. 


Ualienor ........ 1095 F 
CI am-stram dames . . .. 199F 
C] autofor. assembleur . . 295 F 
© bang/échn. (éd. aries) .. 350 F 
[batman . ........ 169 F 
Obocüs:.….; ue 199 F 
CO] bridge player 3. . ... 220 F 
© cobol (notice angl). . . 550 F 
À colossus chess 4. ... 175F 
© comptabi. (éd. aries) . . 350 F 


© compte bang. (éd. smart) 680 F 


DO 102 prog. sur amstrad .. 120 F 
amstrad à l'école. . .. 120 F 
D amstrad en famille. . . 120 F 
amstrad en musique . . 165 F 
Oclefs pour amstradt1 140 F 
Clefs pour amstrad t2.. 155F 


INTERFACE T.V. 


Cette interface va cous permettre de transformer votre moniteur couleur en T.V. 


LOGICIELS PCW 
damocles . . ..... 1750 F 
D fairlight. . ....... 170F 
À force 4 + mis. detec.. . 190 F 
O1 gp Il (éd. arkenciel) . . 760 F 
© graphol. + bioryth.. . . 199 F 
D] histoire d'or. . . . ... 245F 
la paie cresus 1175F 
CO lang. “c” (not. angl) . . 550 F 
CO multiplan . . ...... 498 F 
O nostradabur. . . .... 590 F 
polymail + polyword. . 460 F 
LIVRES 


D cp/m + sur cpc etpcw 100 F 
D gest. pew amstrad . .. 175F 
O graphis. et sons du cpc.. 129 F 


CO Ass. de l'amstrad. . .. 105F 
la bible des cpc. . . .. 199 F 
© basic doigts cp. . . .. 149F 


ADRESSE 


TÉL 


Mode de paiement : [ 


ORDINATEUR : 


NOUVEAU MODÈLE 


polypl. + polices n° 1 .. 460 F 
© polyprint + polyword .. 490 F 
C] polyprogram . . ... 1185F 

pros./suiv. cl. (éd. aries) 350 F 

quick mailing. . . . .. 790 F 

CE. RP 199 F 

rate ae 350 F 
HET RER 160 F 


[ space invader. . . ... 


D tassword 8000. . ... 450 F 
Ctomahawk ....... 210F 
D langage machine cpc. . 129F 


O routines du cpc 


Dliv. lect. disq. cpc. . .. 149F 
D logo sur cpc. .. .... 149 F 
peeks pokes du cpc . .. 99F 


rsx et rout, ass. Sur ele 200 F 


Ü 


6128 coul. 
CODE POSTAL 


PS Le et MU ie 


[ 6128 mono. 


Le “must” pour les amateurs de graphisme. Utilisée 
par la majorité des créateurs de logiciel cette tablette 
vous séduira par sa simplicité d'utilisation et la qualité 
“top niveau” des résultats obtenus. (ex. options : faire 
des points, traits, boîtes, cercles, texte, remplir, “zoom”... 
Lgraphiscop 990 F 


Des boîtes géniales pour ranger vos supports. 
pour disquettes 5” 1/4 
CO] pour disquettes 3" et 3" 1/2... 
O] pour cassettes 


Câble imprimante AMSTRAD 
Vous permet de connecter votre AMSTRAD à n'im- 
porte quelle imprimante au standard “centronic” 


© câble imprimante. ..................... 150 F 
1 ruban imprimante DMP1 (par 2) .......... 198F 
euban imprimante DMP 2000............... 99F 
ADAPTATEUR PERITEL TOUS CPC ............ 450 F 


D 464 coul. 


464 mono. 
VILLE 


8256 [] 8512 


Tous nos F7 sont indicatifs 


chèque / [l mandat / [] contre-remboursement (prévoir 20 F de frais) — envoyer le tout à : ORDIVIDUEL, 20, rue de Montreuil 94300 VINCENNES. [] 


MUSIC TUTOR 


Un système musical unique 


Marcel LEJEUNE 


La société T.M.P.I. (Techni-Musique et 
Parole Informatique) a acquis auprès des 
administrations une solide réputation 
dans le secteur de la synthèse vocale. En 
effet, son synthétiseur de parole, apparu 
sur le marché il y a plus d'un an, a été 
le premier modèle du genre à s'exprimer 
correctement dans notre langue, sans 
l'horrible accent anglais qui caractérisait 
les produits concurrents. Par ailleurs, 
cette société est également connue pour 
avoir vendu à l'Education nationale 
360 000 logiciels d'enseignement musi- 
cal. 

Music Tutor est un tout nouveau produit 
destiné à apprendre seul, ou en école de 
musique, à jouer d'un instrument à cla- 
vier. L'ensemble se compose d'un 
synthétiseur stéréophonique se connec- 
tant sur l'arrière de l'AMSTRAD, d'un 
clavier comportant 4-octaves et d’une 
disquette. Le synthétiseur comporte un 
connecteur femelle qui se raccorde à la 
prise extension située à l'arrière de l'or- 
dinateur, et un connecteur mâle qui per- 
met le raccordement du ou des lecteurs 
de disquettes. Sur le côté droit se trouve 
un connecteur 16 points pour le clavier. 
La liaison se fait par l'intermédiaire d'un 
câble en nappe. Enfin, un jack‘ permet de 
raccorder le synthétiseur à un amplifica- 
teur stéréophonique. 

L'instrument ainsi réalisé est polyphoni- 
que et permet de jouer jusqu'à 12 notes 
simultanément. Mais attention, Music 
Tutor n'a pas la vocation d'être un 
synthé de scène, et il ne faut donc pas 
s'attendre à de gros sons comme un 
DX7 de Yamaha. N'oublions pas qu'il 
s’agit d'un instrument d'étude, et TMPI 
a choisi un son de base comparable à 
celui du traditionnel guide-chant électri- 
que. Malgré tout, nous verrons au para- 
graphe du logiciel que’ l'enveloppe de 
volume peut être modifiée. Pour en finir 
avec le clavier, signalons que la largeur 
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des touches est au standard internatio- 
nal, contrairement à certains jouets et, 
de plus, leur contact est fort agréable. 


LE LOGICIEL 


La première disquette comporte le logi- 
ciel de composition et un vingtaine de 
morceaux de musique prêts à l'emploi. 
Le programme de composition permet 
l'écriture de 4 voies musicales, ayant 
chacune sa propre sonorité modifiable, 
à l'aide du générateur d’enveloppes de 
volume. L'utilisateur peut ainsi écrire 
n'importe quelle partition sans connais- 
sance particulière de la musique. Une fois 
la saisie effectuée, le synthétiseur jouera 
le morceau en entier ou page après page, 
à votre convenance. Il est même possi- 
ble d'imprimer la partition si vous dispo- 
sez d’une imprimante compatible Epson. 
L'intérêt principal de Music Tutor réside, 
à notre avis, dans la possibilité de jouer 
une partition choisie en la déchiffrant sur 
l'écran de l'ordinateur, tout en étant 
accompagné automatiquement sur les 
trois autres voies (basse, accompagne- 
ment et contre-chant). 

La seconde disquette livrée avec le 
synthétiseur comporte un cours de sol- 
fège comprenant un enseignement à 
base de cours et une série d'exercices en 
clé de sol ou de fa, ainsi que des dictées 
musicales et des leçons de rythme. TMPI 
a voulu faire de Music Tutor un produit 
évolutif et prépare de nouveaux logiciels 
qui viendront augmenter les possibilités 
du système. On pourra, par exemple, 
visualiser le clavier sur l'écran avec une 
animation indiquant les touches à pres- 
ser durant l'exécution d'une partition. 
Enfin, de nouveaux morceaux de diffi- 
culté croissante seront disponibles pro- 
chainement sur disquette. 
Techni-Musique et Parole Informatique, 
tél. 73.26.21.04,. 


COURRIER DES LECTEURS 


Dans cette rubrique, nous aborderons les 
sujets qui vous préoccupent et dont vous 
faites étalage dans le courrier que vous 
nous adressez. 


L'extension RAM  DK'TRONICS, 
transforme-t-elle le 464 (ou le 664) en 
6128 ? 

Nous avons proposé à nos lecteurs un 
banc d'essai de cette extension RAM 
bien séduisante. Le test avait été effec- 
tué sur un 664, ce qui avait permis de 
constater que dBase || pouvait être uti- 
lisé. Par contre, sur un 464, il semble- 
rait que ni MULTIPLAN, ni dBase ne tour- 
nent. En fait, la DK'Tronics et le logiciel 
qui l'accompagne, ne transforment pas 
complètement votre CPC 464 en 6128 
(problèmes de bankswitching et de nou- 
velles instructions). 

La solution idéale consiste à changer la 
ROM du CPC 464 en la remplaçant par 
celle du 6128, tout en implantant une 
DK'Tronics. L'illusion devient parfaite ! 


| serait bon de faire figurer, avec chaque 
programme publié dans CPC un tableau 
des variables utilisées. De plus, ne pas 
négliger d'indiquer sur quellefs) 
machine(s) peut tourner le logiciel. 

Si le problème de la liste récapitulative 
des variables n’est pas facile à résoudre 
et dépend essentiellement de la bonne 
volonté des auteurs (de même que la 
publication d'un organigramme, souvent 
demandée...}, les lecteurs de CPC pour- 
ront remarquer que, désormais, un petit 
tableau figurera avec nos listings afin 
d'indiquer sur quelles machines le pro- 
gramme peut être utilisé. 


Pourriez-vous éviter l'utilisation de la let- 
tre ‘1° (L minuscule) dans les variables, 
celle-ci se confondant aisément avec le 
chiffre 1 ? 

Même réponse qu'à la question précé- 
dente : ceci ne dépend que de l’auteur, 
et il nous serait difficile, à la rédaction, 
de modifier les programmes en consé- 
quence. Rappelons que les programmes 
sont envoyés, par leurs auteurs, sur sup- 
port magnétique. C'est sous cette forme 
qu'ils sont testés avant publication. 
L'édition du listing, reproduit par procédé 
photographique, a lieu à partir du pro- 
gramme en mémoire. 


Qu'est-ce qu'une compilation ? 

Nos lecteurs confondent parfois ce 
terme, utilisé souvent à tort (ou plutôt 
par déformation) par les éditeurs de logi- 
ciels. En effet, on voit de plus en plus 
apparaître sur le marché des disquettes 
ou cassettes sur lesquelles sont réunis 
plusieurs jeux sous le vocable de ‘’com- 
pilation'’. 

En fait, la compilation est l'opération réa- 
lisée par un compilateur, logiciel qui 
transforme un langage source (Basic, par 
exemple). en langage objet exécutable 


par le microprocesseur. Rappelons que 
cette opération a lieu une fois pour tou- 
tes, à l'inverse de l'interprétation (le 
Basic AMSTRAD est un langage inter- 
prété) quiretraduit à chaque fois la ligne 
de programme en cours d'exécution 
avec une perte de temps considérable. 


Comment obtenir, sur l'imprimante, l'ac- 
cent circonflexe ou le tilde ? 

C'est très simple, il suffit d'envoyer suc- 
cessivement trois codes : la lettre e, le 
backspace (retour arrière d’une position), 
puis l'accent. De même pour le tilde.. Le 
retour arrière est obtenu par CHRS(8). 
Relisez attentivement le manuel de votre 
imprimante : en règle générale, tout ceci 
est clairement expliqué. 


BUG AMSTRAD 


On va ouvrir une rubrique ! Thierry 
MATHIAS nous en signale un beau, sur 
464 uniquement. Pour vous en convain- 
cre, essayez ?(—1)11. Pas mal, non ? 
Heureusement, l’école a été inventée 
avant les 664 et 6128... 


A PROPOS DU PROGRAMME 
"MASQUE DE SAISIE" 
(CPC HS n° 2) 


L'auteur propose une modification 
mineure, visant à conserver la fonction 
‘"DEL'" après avoir activé le retour à la 
première question, pour corriger. 

La ligne 390 seule sera modifiée. || suf- 
fit d'insérer une instruction B1(T)=" 
entre le IF THEN et le PRINT INVERSES. 


NOTRE GROUPE RECHERCHE 
2 COLLABORATEURSITRICES) 


pour participer à la rédaction de 
ses revues spécialisées. 


Il(s) ou elle(s) devront être dispo- 
nibles, dynamiques et sauront 
rédiger avec humour. Une 
expression écrite aisée est 
nécessaire. 


LIEU DE TRAVAIL: près de 
RENNES 


1e" poste : une excellente con- 
naissance des ordinateurs de la 
gamme AMSTRAD et de leur 
environnement matériel et logi- 
ciel est demandée. 


2° poste : de solides connais- 
sances sur les ordinateurs com- 
patibles PC sont indispensables 
pour être sélectionné(e). 


Appelez le 99.52.98.11 et 
demandez Denis BONOMO ou 
Marcel LE JEUNE pour un 
entretien. 


CONÇCQURS INFORMATIQUE 
CPC 


RÉSULTATS DE 
LA CATÉGORIE 
ÉDUCATIFS 


Vous avez été très nombreux à nous 
envoyer des programmes éducatifs dans le 
cadre de notre concours. Nous avons pu 
parcourir ainsi tous les domaines : 
mathématiques, histoire, géographie, 
langues vivantes ou dites ‘’mortes’”, 
français. (la liste n’est pas exhaustive). 

Le dépouillement a été effectué avec le 
sérieux qui caractérise CPC, d'après les 
critères suivants : intérêt du thème choisi, 
présentation, clarté de la notice 
explicative, qualité de la réalisation et 
enfin compatibilité aux trois modèles de 
CPC AMSTRAD, ce qui a parfois pénalisé 
les programmes ne tournant pas sur 464. 
L'heure est maintenant venue de proclamer 
la liste de gagnants et rendez-vous 
prochainement pour la distribution des 
prix aux auteurs ayant participé dans la 
catégorie Utilitaires. 


Michel et Jack PEIGNEY de 
Senlis (60) pour VISION gagnent un 
voyage pour deux personnes aux Canaries. 
Franck BETTON de Guengat (29) 
pour TOP CALCUL gagne un AMSTRAD PC 
1512. 

Vincent COURTOIS de Wattignies 
(59) pour EUROGEO gagne un walkman et 
5 logiciels de jeux. 

Didier ROSENSTRAUB de st. 
Vrain (91) pour FRANCE gagne un 
abonnement de deux ans à CPC. 

Fabien SALIS de St. Marcel les 
Valence (26) pour AMSTRADUCTION 
gagne un abonnement de un an à CPC. 
Laurent GROSSE de Gray (70) pour 
CONJUGAISON ALLEMANDE, 

Patrick SENE de Cambrai (59) pour 
LV3, 

Jean-Yves DUFRANI de La Valette 
(83) pour FONCSTAT, 

Damien DEBAISIEUX de 
Villeuneuve d'Ascq (59) pour 
MATHEMATIQUES, 

Gérard VILLANFIN de Bagneux 
(92) pour TRIGO 36, 

gagnent un livre d'aventure. 

Tous les autres participants recevront une bande dessinée. 


1e" Prix : 


2° Prix : 


3° Prix 


4° Prix : 


5° Prix : 


6° au 10° Prix : 


Albert ROUX 


ncore un programme pour essayer de voir clair dans les entrail- 
les du CPC. Ce que l’on peut en faire ? Cela dépend avant tout 
de l'esprit de curiosité ou de création de chacun. 


La fonction RND puisqu'il faut l'appeler 
Dar, son nom Génération pseudo 
aledtoire. laisse présager que le terme 
pséudo-est lourd de sens, pas d'illusions. 
a est pas du vrai hasard... comme au 
fou comme les numéros des plaques 
riéralogiques des voitures que vous 
VUYEZ passer dans la rue. Non, c'est sans 
lantaisie. froid, mathématique. issu 
dune equation, donc risque de periodi 
Cite plus où moins cyclique. dépendant 
de la formule mathématique génératrice. 
ne faut pas exagérer. ca ne marche pas 
top mal, mais bien Sûr que dans certains 
tas, etre Conscient qu'il peut y avoir uni 
probleme de Ce cote la, permet d'aller se 
coucher plus tot certains soirs de pro 
londe reflexion. Ê 
Le vrai hasard. lui, est emmailloté dans 
ut tas de lois. de tables. d'abaques. 
Quand on pense que seulement en 
jouant a pile où face. on déclenche tou 
tes les lois de distribution et de réparti 
tion | 
lous les scientifiques, qui ont voulu avoir 
leur nom dans le Larousse. se sont occu 
pes de probabilité... beaucoup d'autres. 
et. Fermat. Bernoulli. Laplace, Gauss. 
Pascal, tiens... à propos de Pascal, un 
triangle arithmétique porte son nom. il 
s'agit d'un tableau qui peut servir à 
resoudre des problèmes de probabilite. 
Ce triangle se présente ainsi, suivant la 
figure 1. 
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Figure 1 


Tout élément du triangle est la somme 
des deux éléments qui se trouvent à sa 
droite et à sa gauche, au dessus de lu. 
Ilest facile de continuer le prolongement 
de la figure. Chaque ligne parallèle à la 
base est l'image d'une courbe de Gauss. 
Courbes qui sont caractérisées d'un 
sommet, duquel elles décroissent cons 
tamment. Elles sont aussi appelées cour 
bes en cloche . elles représentent une loi 
de probabilité. la loi normale de distribu 
Uuon. 

Vous allez tout comprendre avec quel 
que chose de plus concret. On obtient 
une assez bonne image de la courbe de 
Gauss avec l'appareil de Galton. repré 
senté en figure 2. 


Figure 2 


a | 


Des petites billes sont déversées par une 
youlotte-entonnoir. Dans leur trajet de 
chute. elles rencontrent des obstacles 
igenre flipper) qui les dévient, soit à 
droite, soit à gauche (pas d'abstention). 
avec des probabilités sensiblement éga- 
les. Des tubes recueillent au bas les bil 
les suivant les écarts qu'elles ont accu 
mulés dans leur parcours. 

Au debut de l'opération, les tubes se 
remplissent un peu n'importe comment. 
puis, progressivement, à mesure que le 
nombre de billes déversées augmente, 
l'ensemble des niveaux de remplissage 
de chaque tube tend à affirmer une 
courbe... de Gauss. 

Bon, ça y est. vous faites la relation du 
résultat obtenu avec la machine de Gal- 
ton. la courbe de Gauss et le triangle de 
Pascal ! 

Forts de tout cela, nous pouvons voir 
comment se comporte la fonction RND 
de l'AMSTRAD si on lui fait jouer le rôle 
de la machine à billes. 

Pour cela, on va considérer comme des 
plus où des moins les nombres de la suite 
générée par RND,. respectivement ceux 
qui sont supérieurs à 0,5 et ceux qui sont 
inférieurs à 0.5... if RND(1)<0,5 then... 
else. 


PROGRAMME ‘'A'' 


On obtient avec le programme ‘’A'', une 
ligne de 9 colonnes de chiffres. Si la dis 
tnbution RND a l'aspect du hasard, on 
doit obtenir progressivement 1-8-28 56 
7/0 56-28-8-1 {voir la première ligne à 
compléter sur le triangle de Pascal). 
Vous pouvez : 
- ligne 60, changer la väleur Co pour 
obtenir un autre nombre de colonnes ; 
- ligne 110, faire varier ‘la valeur 0,5 
ivous constaterez la dissymétrie. Sur la 
suite affichée). ne 


A la ligne 50, la valeur T est seulement 
la valeur du cycle d'affichages ; vous 
pouvez aussi la changer. 

Par un GOTO 200 (après avoir fait tour- 
ner le programme), on obtient les valeurs 


Le programme est structuré surtout pour 


être assez rapide et d’une bonne com- 


préhension. Dans le cas où, comme pour 
le programme ‘'A', on veut visualiser 
graphiquement l’évolution, il est intéres- 


sant de voir, avec plus de précision, ce 
qui se passe au début de l'analyse. Pour 
cela, ligne 200, adaptez une équation 
pour la valeur O,1, la faisant débuter, par 


! exemple, à 0,005 et se terminer à O,2. 
brutes réelles de chaque colonne (le 


nombre de billes dans chaque tube de la 
machine de Galton), et le total des RND 
générés (le nombre total de billes déver- 
sées). 

Ces valeurs vous donnent les éléments 
pour tracer une courbe où un histo- 
gramme avec affichage de la progressi- 
vité. Vous pouvez aussi faire un pro- 
gramme de génération de nombres aléa- 
toires et le tester. Pensez que, pour géné- 
rer une même suite RND, vous pouvez 
commencer par un RANDOMIZE. 


PROGRAMME ‘'A"" 


10 
£<o 


20 


TRIANGLE 
proar. 


de  FASCAL 
d experimentation 
Roux 


A. 


mat 5 86 
40 
50 
60 
20 
40 


CLS: MODE 2 
40 

Co=9 
Co-1:D1IM F(C) 


Wb de 


TRANCHES 
CHIFFRES 


par boucle 
(colonnes) 
C= 


PROGRAMME ‘'B'" 


Si le début de l'article a été suffisamment 
explicite, vous n'aurez pas trop de sur- 
prises en faisant RUN sur le programme 
‘"B". 

La structure de ce programme est sim- 
ple : c'est le même algorithme que le pro- 
gramme ‘A’, répété Co fois (ligne 140). 
Ligne 220, une équation qui, approxima- 
tivement, à chaque ligne du triangle dou- 
ble, par rapport à la ligne précédente, le 
nombre de RND qui sont analysés ; cela 
pour obtenir une progression homogène 
des lignes successives. 


18] . 
100 FÜR 
110 


Iranz 1 10 1 
.FOR Chif= 1 
120 FOW)= FN) +1: 
120 NEX1 
140 : 

150 Z= 2+is: CLS: LOCAIE 1,10 
160 o 

1/0 

180 : 
190 GO0I0U 100 
200 
#10 
#0 
*10 


10 
N= 


C:N= 
Q 


N+ ARS (KRND (1): O0,.5):NEX1 Chif 


FOR i= O 10 C: Y=F(i)x 2 “c/ FRINT INTCY)5:NEX 1 


FRINT p@i)st0T= 
"sioT 


EUR = 0 
FKRINI " 


10)1-= OX ] 


[0 Co-1: 
10OTAL= 


PROGRAMME ‘‘B'" 


TRIANGLE de FASCAL 


Four: à. mars Bé 
Ce triangle se realise en veritiant la loi de repartition de 1a 
aeneration pseudo aleatoire KND ,il en est la representation exacte. 

I1 est possible. LIGNE 140 de changer la valeur de Co ,ce 
permet d'obtenir un nombre difterent de colonnes, jusqu a 12? 


de probleme,au-dessus revoir le module d affichage USING, LIGNE 


’ 
CS ED 


qui 
35 


zeû* 


Le sous-programme ligne 450 se commande par un G0TD 456,11 permet 
de visualiser les VARIABLES ,11 en donne lés valeurs brutes....qaui 
composent chaque liane. 

Four poursuivre le progamme sans remise a 
charqgees faire 50/0 200, 


zero des variables deja 


DEFINT A-Z :CLS : MODE 
7 : Nombre de 
Nombre de 


rt) 


colonnes de CHIFFRES 
Tranches par boucle 


LOCATE 40,5:FRINT"1" 


4 = 1 10 €C 
2 1= 0.1% EXxF(0.8%x X)+ 1 
{ 
1. XX= 27X 
DATE . 
ERNST : 
ete = =. e 
' RIRES FOR Tran= 1 10 1 
re FR N 2 Tate Tel {y . 
Z : 
ORAN SN SNA _ 7 ne 
Dale eue sr FOR Chif= 1 TO X:N= N+ ABS (RND (1) 0.5) :NEXT 
PE er Nimes 
RE UNIS Ve : e 
CRIS NAT On FOXAND= FCOXINIÉE 2N= 0 
MENT GOT NEXT Tran 
HUE AU UE : 
CE ge rte 
SAP ARR lee le VA Z(X)= Z(X)+ F 
NAN ES PRÉN RS RNT ER à A Res de = rares 
VASTES LOCATE 1,X+5 :FRINT CHR& (18) 
TS NS mA AS UN, SALE = ; = 
Re LOCALE Z7-x42. +5 
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FOR = QG Ti Xe v=eFCX [ox XX, ZUOX) 8 PRINT USING" ####"s vs: NEXT | 
ï 0 


MEXT X es 


SI 
ET 


GO 210 : ! 


Sous-Froaramme , à appeler par GSDUID 450 


FUR 4 1 Vi) Co-i 
FOR 11= Q (ÙÜ j 
PRDNT MRoa de Medio trs Mep'Ci sit) 
NEXxT 11 
J= ji 
FRINT 
NEXxXT 
340 FÜR 1= 1 1) Lo-1 
990 IF 1=1 THEN FRINT'" Nb, de RND( ) de la ligne "sitis"--- "3 Z(1):6010 570 
360 PELNT, M sessmassse see ligne “ai+tisess Ms ZT 
570 sumi= sum'+2Z(1l) 
80 NEXT [I 
3970 PRINT 2FRINT " Nb. total de RND( ) generes --- ":;sum! 
600 sumiz ( 9 
PROGRAMME ‘‘C'’ e CE ROCE| 
PROGRAMME ‘‘C'’ HEXA FANTAISIE | 
En réfléchissant à la génération RND, 
vous vous êtes peut-être posé la ques- — 
tion (dans le cas contraire, ça n'a pas SC --—— Plus long.serise consecutives de RND int.ou sup. à 0,5 
d'importance) quelles sont les plus lon- | ---.__ 
gues séries consécutives inférieures ou SS DIM a(id):E= 15 
supérieures à 0,5. 64 FÜR 1= 1 [0 14:KREAD ACL): NEXI 
Si vous en avez le temps, essayez de 85 : 


faire un ‘’bout'' de programme vous affi- 29 EUR EL = 4 TO 14 


3 75 FOR [liz E 10 E+Ai{1) 
chant au fur et à mesure la plus grande B0 RERD DRE: PRINT UHR CVAL ME DRE) p 4 
suite inférieure ou supérieure à O,5 ren- 85 NEXT LCI 
contrée dans : 10 x=rnd(l):goto 10. GS FRINI:E= E+ACII) 
Dans le cas où vous voulez comparer le 9 NEXI LI 
programme que vous avez fait avec celui 100 : 
de ‘votre revue préférée’, vous tapez LOS 
le programme ‘‘'C'" (ne vous y fiez pas, 110  DAalA 31.31.13.23.25.11.14 
c'est du vrai Basic). 115 DATA 9.11.14,31,09,71,20 
Sitôt tapé, vous le saurez ensuite... UE en LE Rs 
RUN … ENTER. Vous obtenez 14 lignes, 2. NI #4 


; 10 HiA &Ù 
que vous validerez chacune par un COPY 125 ie | a © 


et un ENTER. ao Data 6% 
Si vous le voulez... faites DELETE 50 -. | 145 Data 6%.76.6%.% 
Après un RUN-ENTER sur ce pro- i 150  DAÏIA 65.20,5%,.4E. 4 


gramme, vous allez voir s'afficher à 155  DAlA 75,70.2E,4:0,65,74,70,65 
mesure qu'elles sont rencontrées, les 140  DAlh 

longueurs maximales des séries. Vous 165 DATA 

laissez ‘'tourner'" jusqu'à ce qui vous 1/0 DATA 

semble être le maximum. C'est à ce 17S. DATA S 


N 31) » É 
moment-là que vous vous poserez la 158 DAtR 


ha à 185  Dalé 
question pour Savoir si, en continuant, 190 Data 
il eut fallu un repère... ajoutez au pro 195 Dal 
gramme un décompte de RND ! Il vous 200 Dali 
est possible à présent de connaitre le 20% DATA 
nombre de RND entre deux suites maxi- 215  Déaln 


mum. Vous avez peut-être découvert DAla 54,45,20,73 
une périodicité : pour en être sûr, il faut DA La J£,16.20, 49 
voir si la série consécutive est constituée DATA 6/.74,20,54 


DAlA 48.45.48, 70,80,S52.49,4E 
Din 54,20,687.,2IA, : 
240  DAIA 34,87,23D,70 
"«04.4F,20 


par des nombres comportant les mêmes 
chiffres. | 
Pensez, si cela vous arrange pour certal- 
nes comparaisons, à commencer avec 
un RANDOMIZE. 


50  DAIA 
295 DATA 


245  DAIA 

S'il y a une périodicité, cela veut dire 280 DAIA 20,74, 
qu'après un certain nombre de RND, 6% DATA 4,20,45,48,20,70 
nous retrouverons toujours cycliquement 2/0  LAlA 3E .20.54.46.49,4E 
les mêmes suites de nombres. | 2/3  Dalk 14,20,70 
. - ” +, æ D ‘44 à + d à ) D 
NI SNS RAS ER GEUSE, URL ES Rte 1 £2H0 Dita +7. /0,.:D 
RTS NAT CE EN ES | 5 Dale 47,4F.54.4F 
ROSE INRA TE Date 1,50, 20,20@ 
re > ATEN AIS VAS TS ALAN Lié4 LA .2-U, JU, EC 
DÉC 2 EN 1S 7 ISA UNS 
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SOLITAIRE 


Georges GOUMENT 


Il était toutefois possible de lui apporter un petit quelque chose en plus. C'est fait 


C: casse-tête des plus classique n'est plus à présenter. 


avec ce programme |!.. 


Vous avez à votre disposition un superbe jeu, avec trois niveaux de difficultés, de quoi 


passer de nombreuses heures à ‘’gamberger‘” 


Mode d'emploi et règles incorporées. Aucun problème pendant une partie, l'ordinateur 
affichant les différentes phases de jeu, ainsi que les erreurs diverses. 
Programme en 2 parties à taper et sauvegarder indépendamment. 


i RER ER HE CRE A EE EE 
# 

3 

és 

3 page ecran 19ad 

Fé 


=, RE 

ë MÜDE LeINE GG, 12e BORDER 12e [NE és INE 
FILS INE Le LC: SYMEROL SFTER 54 

| TO 251 


FA 


si,ssi,si 


9 SYMEOL i,51,32,53 
10 MENT 


ë1 


ÉRRTUSEER 


15 DATA 


NL HUE, TRE st 
TRS re 
to 0, 0, ÈIC, R7 Fr, 


BOF tait HOT C 


0, “et, 


f,% 114$, KU+, 


STARLNES ES, CHR 


À EU 

19 FOR ii TO 4:FEN SRE x, yiLOCATE x, 
YIFRENT CHRSCIALIEIMERT 3 
E0 LATA 20,219, T, ECS, 21,53 

21 LOCSTE sis FEN 1: PRINT CHR CEE I : LULR 


“34 IF TEST Ux2, va) 


TE AI PEN Se FRINI CHR ! £: 

Ci FRINT CHRE TTits LUEUR 

sell Te LS As FRENT Che Céatir se CRRR 

AT) sCHRE ia 

se LOCSIE SF: FRINT LHRE( 
= HAS FRINT Li Ë : : 

PRINT CHPS at is LA CL re LUCE : 

E fc: FRINT CHR Ets CHRE SE IS 

IURE «5 

FOR ei td fsFEN 

,“2FRINT 

7 LA LS 


LHRS$ 1€ 2 NEXT L 


IA, 21,2 25E 
PRINT CHRE CUT 
ATE UT, Is FRINT CHRS (278: 

FEN ZeLOCATE 18,3: PFRINT CHARS 
TE SI, SL: FRINT CHR ISIS! 

28 titre$="SOLiTaiRE "rs vs 
1VYei0é:asi: GOSUE EF:G0f0 dû 
+ caractere=LEN(titret)ispirel=caractere 


AU seléd0-caractererii),# 
S1 LOCATE L,Ir PEN GiFRINT titres PEN 
TD Otumue 22300 


mi RATER VE 


Z5 FOR ii T0 6: 


SCI EGR ei 10 pixel 
THEN FLOT K,%,asrLii 
Yi PLOT K45,v- 

35 k=xrdr42eu 242 Se 


56 NEXT 


Le 


div 


4 Er. Sneer EN CG: LÜCRTE 14, !19:FEI 
CATE LI FEN SiFRINT es 
CASSE-TÉTEMS:FEN csFhini" 


el 
 . PRINT" 


di RANLOHIZE TIME 

45 FÜR 121 T0 Zoüdenotes [NT CRNLæGin + 
UND note, li, io: CALL - 
LL &EBRDSS:INEEZ 
4 RUW°soliti" 


1, 
per 


4 RÉERÉAESSIRÉENESRRET LE LHRLLHESESERSSELESS 
. iettres accentuees et regies du jeu 


FH RAR RS DURÉE SRE ÉENSERES ARR SR 
ENV L 


1,=5,80 


5 SYMEOL AFTER 4: 
7 FOR jai 


5 REAL €C,5 ,32.564,5/.55 
4 ne 1304 5643; 55 


ss DUR; ! 
de 
FOsitions 


es … où 4 "6 8 
Une paSTIiES sr Lii 


CO: Pui-m 
FELATIER INT 
“x FEN 
Gane 
possibles: ":FRINT 


FER capritit 
is FRINE "choix 
Un des 47 


QL.E 


ipPart 


= 5, 460,20, 15 DD Semen, cit, 
tLOCATE 1,24: PRINT "Aopuyez Sur fi 
e" 
25 LSSINREsSSIF Les tt HER LE 
27 CLS: RETURN 
Lt LÉLÉHERELRESAHRÉEIRELRERE EEE E RE EHESS 
partant d UNE Case OCCUFLE, 3 
case libre et en ne prenant qu initiaiisstions diverges 
un pion chaque diplacement, vous devez 
vider le plateau de jeu, ":FRINT AR DEA HR D A A 
la FHINI"LS partie est gagnie lorsau il MODE 1:E0RDER LisiNE 0, Lis TUE Lousit 
né Preste ou un pion SSOLITAIRE: sur ls d ZaditINE 3, il: jeuippetipoqsiipret : 
anier, FER 1 
17 FÉINTIFRINT Au cours de la partie n 0 36 DIM +#5(5),ph#te; 
ubiiez jamais..un dipiscement ne se riai 27 +ECLI=STRINGÉ (ZE, CHARS (14510 
1i ÿ & une crise. "ss PRINT: PEINT 36 F#(2) =STRINGSS,CHRS# (14: 
attention aux pions is0oliis !.., “ CE SETRINGS (LE, CHRS : 207: 
ront pas toujours ricupirabies 40 +#(4)=STRINGSL IS, CHR IIAT; 5) 
ent vous obliger & annuier la 41 +$(5i= =STRINGS (7, CHRS (145) ) 
4: FÜR 1=i 10 & 
JO SsPFRINOMDNE FARTIE ANNULEE 43 READ ph$iit 
. UNE PARTIE FERDUE":FEN Le SUSUE 7 4 MEAT 1 
19 FRINT'L. ordinateur signale toutes le 45 DATA "DEFLACEMENT IMFO: D 
& erreurede Jeu, voiontaires où non. "iFk “AERIVEE OCCUFEE", “AUCUN FIiON à 
RER ANESERAn N'essavez pas CEARTIE ANNULEE ET CHOL 


ous PENSE 
en perdre aura 
IS Le programme gs arr ts 
i ‘suitat es 27 
sFEIAT:I PRINT" Fouc 37 
pion“: PRINT" 1 5 45 
coionne"sFRINT" 5 

lLione“sFRINT Era 
con clignote": FRINT 51 
cogrdonnie 


46 


QE 


& d'un 
= ia 


ies 


FTIE 


i 
OsLOCATE 12.14: FRIN 
3Fir deiaisl 


FERDLIE", 
Ai DFI LE 


IE: n dl : 
Eu aus à 


“NIV 


il ou Hi. 


LOCATE i1,1sFE 


N 


INF 1, 11:CLE 
ARÉRÉSERHÉRSARENSÉ RSR ESS BR Rae 
Federinition 


Cnlrires CZ 


ii 


sfinition chitires des lignes 


52, 4 .e4 


LOU, Ss1,8s4,85,s4 


Le0, &B0, à EC 


STORE de 

JR 15185 TD 195 

FLAD s1,84,83 

94 SYMEUL 1,81,542,53 

f+t.utr, Se NEXT 

Va DATA K19,818,4/e,400,866, 8478, 406, éd, 

te, 4is, Sc 06, &06, à 70, È66, kéo. HSE, 

1E nAlE,%I8, ob, bôb, HEC, ROG, ROG, M7c 

97 RESTURE JE 

Sy FÜR 17194 TO 202 

si,s:, 1 sA. 85,56,57 | “y READ 51,82,82 

4 SYMBUL 1,80,51,55,81,54,55,56,5/ lus SYMBOL LULU 0,0,0,81,s2,83 

me HNÉRT 1 Li NEXT 
DATA U,# 0, 0,0, 0, 07, 0,0,0,0,0,0, k 102 DâTé € 


jt DeiTet at ta et + tt tt tt tt. 
k MU 7,0, CU 


LU GC 


: 
UE 4 UE UUG E s EUG « Ë 
8, 


18,460, 80 
au, L18,# 
0,%#40 


s1,8é, 
4 


5 YMEUL 1,5, ,52,83, 54 


ut, 01, 
xoi,0. 204 JE 
1, M O1, 


c, 438,0 
,18,%18,0,& 


&E , 110 SYMEOL 
F0 7 redefinition case et pion du eu Lil SYMBUL 


7 113 SYMEOL La0, ECO, &BO 
PU RAR ARE DEA DE DEEE DEEE DÉS EE EE ER DD KR ar DEA AA EEE AR 


li4 

PTE dessin du deu et des tableaux 
lié : 

DU max 2 dé dé de D D GE 8 D SE 
115 FRINT CHARS (CZ2) +CHR$ (11 

ILS ENV 1e, jé 
Lau LOCATE S,Z4:PEN GS: PRINT F&(Cli 
121 FLOT 110,14,1:DCRAW 828,14: DR ! 
Silbhen Llu, Sés DRAW 110, ls DRAW SERIE 
liée PLOT 112,28, : OCRÔN 326,32: PLÛT 856,23 
Cha 115,5 
FÜR 1=i T0 ZA 

lé LÜOCATE 10,1:FEN Si FRINT #8 (2) 

ZE NEÉXT 1 

DURE RÉ RÉ RR MERS RÉ RÉÉÉARRRERÉDESE 136 FEN GeLOCATE 10,2: FRINT CHARS (212): L0 


ï 


CATE IT, IsFRINT CHR ISIE Ts EULATE H 
INT CHARS CSI DE eLOCATE 1, Se PRINT LeRE ii 


ViilrPR HN CHRE 2: 
22: PRANT LHPS(ZISH EI LOCATE Lu, Lés Fr 
Lis LOCATE AA, SLI FRINT CHF Cia: 
128 RESTURE 130 

23 FOR 1=i TO diRÉBD vs: LOCATE cover 
NT CHR (T4; EME AT . 
LS DAlh LU, L,31,1, 10,2%, 31,27 
151 FLD 144,78, 1:DFûw 178,48: LRa È, 
BiDRAN dé, FE: DRAN dre, lsé: DRAW 4e, 
Da 18,288: DR 144, éos hé 14, 7E 
lié PLU dd,3e, LiDRAN 16. 44s io 4 
4: DRAW 496,76: FPLÜT 144,74,1:DRäk 175 


DRAU 462. 4%: DRAM 496,74 


ist TD 3 


144 LOCATE 12,22FRINT +$44):LOCATE 1L,.7i 
2FRINT F$idi 

145 FOR v=5 TD £0 

146 ATE 11,V:FRINT CHRS(i47) 

14 LUCATE Zi, ssFRINT CHRSCIAT: 

148 NEXT 

14% LOCATE 11, ZYFRINT CHR# (Zi di iLOCAIE 
G,EIPRINT CHES(ZIS) se LOCATE 11,Z21:PRINT C 
HAE DIS ELOLATE Zu, is FRINT CHARS (SI 

i5t RE: 1éi 

151 FOR v=s TO i9 STEF © 

ISS RÉAL ci.cz,ci,c4 

SE PEN 

154 LOCATE 11,2 PRINT CHARS (Ci sLOCATE 26 
 *:FRINT CHRS (ci) 

155 LOCATE 1i,v+1s PRINT CHARS (cg: LOCATE 
EC, +13: FRINT CHARS (CA) 

156 FEN 
157 LOCATE 11, Vi: PRINT CHRSGCS I LOCAIE 36 
RINT CHR$(cI) 
LOCATE 11.%+1:FRINT CHRS(c&):LOCATE 
He PRINT CHERS (cé) 


BEST 


pet her of per 
TETE 


FEN I 


ESésFLut bis 
His DEN Lie 


PLOT 526,256, 0: CRÔW éûé, 
258,0: LRAL SÛUS,258 

1 2e, 116,0:0RA4 110 
JRAW 608,218: FLO0T SE 


+ à 


CE CE # 


:FÜKE SBZEF, 
SUsLOCATE 3.8:PRINI"FORCE":LOCATE 4,2: 
RINT'GAGNE": LOCATE 34, 8: FRINT "PERDU 

187 = 10 19 BIEP 2 

158 FÜR «ei8 10 25 5 


16 PEN 2 


Di Core Dir 
LC 


Î 
4 


ve PRINT CN RRRAS IEEE 1e? 


f 
le 
“ TE 
Fe 
= 


È 
be 

F 

[æ î 
Ut C4 
pe 

—— 

Fr 


l'3 PiChRE le 
SG: 
15 
ie. SHIFRIRT CHRSIIT 2) F 
17 L:FRIMNS CHFSII 
ei 
155 PEN 1 
ASE LOLATE ROy+lsFETNT CHR: TO ILRRSE 
ii 
Î 
j 
1° £ 
YIFRINT 
#+1iFRINE ie 


HSE SERA EEE RES AR HSE ER SUR E ENS EE 
3 LOCATE 24,10:PEN O:FRINT +8 (2) 

Sù if pp:9 THEN 2 
LPRINT CHRE 174 CHR ii 261 LOCATE 25,10:POKE BE2PBF,245:PRINT pp 


TT 
N 


‘ GUTD és : 

253 IF pp=i0 THEN 840 

23 LOLATE Sd. 10: PEN GrFEINT 440 

JS IF pp=ld THEN ur=idgéiuri=229:dr=127: 
Jet 259 


Seti PRINT CHERS si Zu si CARE: 


! 58 Fr THEN ur=léérurisibdsG0tO 35 
fi 3 


LB ir ppsil THEN ureii7surisias:GOTO 45 
VIFRINT CHR&lléé: sLHRE (IS 7) 
VrisFRINT CHR is sCHRE ile 


+ésurizurité 
Es LOCATE 25,10: FRINT CHR& dis CH 
tLOCSTE SIC: FRINT CHR&uris CHR 


cr 


Lié FEN 2 Heidi 

217 LOLATE #,y2FRINT CHRS (17235 CHARS (1715 PET 
Ce PEN Li LOCATE IS, IG FRINT CHR#idrisse 

Zi LOCATE n,v+1s PRINT CHRE 1/4; CHERS (1 HÉE carietreLOCATE 36,10: PRINT CHK&luri)s 

=: CHERS (ur +1) | 

PEIE 1 Mél AR AREA AE AE RE EE EE EEE 


à LUCRIE s,v+is PRINT CHARS (17 Ss CHER (Ii 


choix du niveau de jeu 
HET 

#* HEXI Ÿ 

LINE LUS INE 2ZESrINE Z,S 
ie pri THEN p=ü:G0TD L46 
Fe HE He AAC AE A DRE EEE EAP AE 2 


RE AE AE AGE EE AE HE OR REX 
LÜOCATE 97,24 

F7 FOR ii T0 LEN(phé (ot) 

SE FÜRE HRSEF. ESS 

8% FRINT MIDH(OhE(S),1,1)3 

FU SOINE 4,255, 1,15 

£ 4,ù,10,0 


affichage des parties gagnantes 


à NEXT i 

LESINEE Ses [IF EE" THEN 275 
PRE PR LEE | 

£&= "1" THEN nv=i: GOTO 
LEZ ES THEN nv=ésGGTG 
LeUIS THEN FE 


PARA AR DRE A ARE DE DEA A AE RUE OX 
ATE 34,S:FEN CsPFRINT +12: 


pa:7 THEN 235 
LOCATE 25,S:FO0rE RESSF, 245: FRINT pag 
LOTO 247 


qeei THEN &40 

LOCATE Z4,S:FEN Ci PRINT f$i£: 

IF pasit THEN ug=idésugi=2297:dg=1£7: 
dai=i4gsi sn z4i 


. SIOsFEN Ce FRINT +$${SrsLOCATE 
LBLSF, 483: FRINT n% 
FEN Z:LOCATE 8, {4 PRINT +#il: 


2. IF pg= THEN ug=i44iugl= 154: 6070 54 FANDOMIZE TIME 
1 FF 1=1 THEN je: 6010 284 


IF J=0 THEN j=i 
IF nv THEN 294 

IF je THEN ZIS 

: SOTD 2:14 

PARA ADR DEEE AE EE EE EEE 


CP IF pagsll THEN ug=if7sugieidg: El 24 


LC ugqeug+isugleugi+ 
Ii FER Zi LOCATE 23,: 
Siuati):LOLATE 26,5 


jeu No ji 
RAR EE JDE EE D AE D DE DE DE DE DE EEE EE ES ER REE 


IF nvsi THEN Isil:c=20:G0T0 Sét 


DR ER ES RE DE EEE RU DEN EUX 


jeu NS à 


71 


cases INT (RH +1 
iF caserie 


THEH 
HET 


+= 
as. 
ER] 

‘is 
Hi] 


Lasers THER 
casezé THEN 
- cases THEN 
casezg THEN 1 


i BU 


DUC OR M GE de BAR DEA EE DE ME RE 5 


LL Ve INT CRNDEG 4 

215 IF yel THEN leÿ 
THEN Le 
THEN 


s Di T0 
: 6070 
#50 T 0 


FHEN 
THEH 
THE 
THEN 


21 HTCRND ESS 5 41 

IF el THEN cei8: GOT 
IF Keï THEN nc 
Ir nes THEN cris GÜTD 
IF ed THEN crig: GOTO 
IF x THE 2 

THEN 
THEN 
THEN 


4 GOTO 380 
= INT (RND4 5) 
IF y=i THEN 


à 
1=5:G0TO 
IF y=z THEN ie 
1 
1# 
i= 


3e 
£ il :80Tû 
IF vez THEN 1 
4 THEN 9: 
v=5 THEN 
#& THEN 
7? THEN 
3 THEN 


HS INT RND#S + 
IF xe1 THEN czi 
7 IF «eX THEN ci 
THEN cz 
12 

1 


THEN € 
THEN c= 
& THEN € 
? THEN 
E THEN 


:GOTO 
4: GOTO 


C= 20: G0TO 


HE : H 


THEN Lercæit 


THEN 1e GOT 


FAR HE JE GER AE 4 HA & HS SA Re es ss 


CH HE HE HE ECHEC A AE CR AN ER AO EN & 


Jeu Ho I 


724 
324 


245 
45 


2e0 
Le 
Hé 


RARREX SES RU NUE se DM Mes 4 UE mure das 
TiChS USE Car sure Fil 


RE BEEN HER SR OS LE LA MUR EE Bo Æ D 


CE 


0 THEN 


RES AE ARTE Luis 


aid 

Lit 1 Ti LENCHE: 
SOUL . Frs, LE 
FRE ë 
FRTHI MEDS Ch & frS 
HOUNO deu jet 
NEXT L 


347 DURÉE 2e, 18: F6 étais Ti 
F deisi 


Jie pg=pg+iiLOCATE S,24sPEN LiPRLAT fi 
De HBROER Lan. 


EE EE 


dei: DOME Le DES FLiONS en Je 


RARE ARE D DEEE D D A dé a on à do de 
285 LOCATE SG: FEN GsFRINT t#(a 
agé IF pret Of 
THEN upsl4ésup 
GT IF Î 
iiupieiés 
M IF mr: 4 
289 dp=ist ss LD 


07 


” 


270 IF prsif THEN dpslilidei={Sisupelder 
upisié4:GOTO 257 

291 IF.pneëis THEN dp=129: dr Le lé 
upletéé4sGOTO 297 
FE IF pnsis THEN dpeiz7: iisabsose ti 
upisiéd4: GOT 597 

LL IF pnsslo THEN 36 

#74 LÜOCATE 4,S:PFORE &E 
SUiQ dur 
upaupe leun eue 
255 PEN £sLOCATE 
Lde+lrsLOCATE 5: 


LUF LAS FRINT pr 


+ 
+ 
À 
2 
10. 


INT 


2378 FEN L:LOCATE 
Sidpi+tii:LOCATE S& 
Lupi+ii 


FÉNRRÉEAR ES XNA AM E SES SES 


EN ©: FEINT 


dde Hot 
BE Lo 


au annulation 


LÉ=INEEVES IE sazuu 
EU ( 
TE 


11,4 
Ti LENCH&: 


Une Partie 


FREC"“) 
THEN 407 


Léa, LO, lu 


attente touche lignes 


THEN 455 


EE SSL: 


COSFOIONNSES 


EE SE D LS 


471 VEritie ls presence d UN pion 
ciignotement du pion 


MERS SS TELL S ES RS ESS SR ES ST S SSSR. 
Tix,vi=2 THEN 478 
z=l:xa= 10: GOTO 647 

LOCATE c,l+1: PEN 0:FRINT 


LocheE pour 


de 


‘test pion a prendre - case libre 


486 IF INKEY (0) 220 


is iF TESTiIRS: 


472 IF TEST(x, y+64) € 
TO 647 

453 li=i-2 

454 12=1-i 

455 13=1-4 

496 14=i-3 

GOTO 535 

IF INHEY (2) Lx 
IF TEST(x,y}=3 


THEN ze: sasios Gi 


GOT SE 


LFRINT CHRS (I 743 CHRS CITE 


VIEES 


sûres sets yet Lis: 10 eus Lacs 


D 
F 
L Te 2e 
d ETR) eg 
5 
= 
5 


RE ARR A SE A A EEE 
LS ion QUICÉE Sa Case d'origine 


EE ES SE LES RE 


CE ts 7 
et .t 


LOCATE € iiFPRINT CHRé(léor: CHE I8 7: 
LÜCATE celle FRINT CHR (CISS: CHRIS 


ie haut ou ie Las 


1.280080, LE 1 
FOR deisiazi 10 100 NEZXT 
DAURR RE AE EE DE ER 


Re ARE A MR AM 9 AE A ER RRE E E E 


: : a anti S *1S 
le pion quitte sa case d'origine le pion contigu est pris 


RAA HE DE ED DEAR DE HE DE RE EEE EE EEE 
B5 LOCATE Ci, ls FRINT CHR#(lébis CHRS (167 


LÜCATE tt CHR (iéé) : h | 
| a bniNT Élbecie SBé LOCATE cl, l+l: PRINT CHARS (168) ; CHRS CI 
FE 


367 SOUND 1,2500,5,15,1 
S88 FÜR deiai=i TO 10H: NEXT 
RS RAR A ROUE RHONE EEE AE DE HE JE EEE DEEE EEE 


SOUND 
FOR 


ét a æt 


le pion contiqu est pris le pion occupe sa nouvelle case 
LE + es # + = 


LH LA 
“d 
+ 


BA DA A BED EE DEC 2 EEE 
IE cite PRINT CHRS (66) ; CHR# (167 


394 FEN £ 
LOCATE c£, Lis PRINT CHR O1 72) SCHRE ITS 


à 
DUT RAA ARE EE DM EE EE DE GER EE EE 
d 
[= 


S4é LORIE c'IiZ:FEINT CHRSGCISDNSCHRS Cie 
; 596 LOCATE c2,i+is PRINT CHR$CI743 3: CHRE CI 


| 
£n 


SOUND L,2500,5,15,1 
FÜR gelaisi 10 106: NEXT 


LÉRÉRERSSERSSMESSRRARARERERÉESESSARRZEE 


DE 


PEN 1 
LOCATE cS,l+1:FRINT CHARS (170) 3 CHRS (1 


does pri 


Ci su CN LR 
“À 5 
D +. 


LE pion QCCUPS 54 nouvelle Case 


, ; ” LS PT SE RS SE SE 
HP OURS ARE ERREURS BRAS EX. QUES , ess one mess unes see ce 


sr 


LE ceicePeint CHRSGI7ZI CNRS LIT 


annulation d'une partie 


£4 


DLE XBZBF.253 
FRINT MID#(ph$(4i,i,1? 
511 SOUND 1,0,19,0 


se 


XT i + 
un 
# + Bei æ 
3,24 | 
10 LENtph$ (5): “asenerens 


te 


Devant le succès obtenu par FLOOPY 64 sur Commodore, INFOMEDIA présente : 


FLOOPY srrao 


le Ter magazine digital pour Amstrad 


- UNE CASSETTE ) pleines à craquer !! 
- UNE DISQUETTE 3 pouces 


- les meilleurs programmes : Les jeux, les trucs et les astuces, les utilitaires, 
les dessins, les musiques, le feuilleton, les potins, les annonces 

- Ja pub : les meilleurs logiciels du moment en démo 

- les concours : Envoyez nous déjà vos meilleures réalisations, jeux, utilitaires, 
dessins, musiques ..…. 

Les PROGRAMMES PUBLIES seront REMUNERES et PARTICIPENT aux CONCOURS 


- cassette(s) 


38 F chez votre revendeur de soft habituel 
- cassette(s) 

- disquettes 3 pouces (2 faces) 

59°F uniquement sur abonnement 


+ toute baisse du prix des disquettes 3 pouces sera répercutée sur le prix de la revue 


+ pour 1 an 


FRANCE NOM : 
Je m'abonne pour : 


3 mois (3 cassettes) 114 F —— © 

3 mois (3 disquettes) 176 F  _—© PRENOM: 55e ia on enere ane acaend ui eue nee 

6 mois (6 cassettes) 220F © un 

6 mois (6 disquettes) 345 FF _— a 
Tan (11 cassettes) 380F | —(@ ADRESSÉ ee eee do ee nc oc est un produit 


MIDI DIFEL SION 68 6075 


Tan (11 disquettes) 590 F  _— © VD 
} 
ETRANGER : Nous consulter INFONEDIN 


A retourner paiement joint à : INFOMEDIA BP 12 66270 LE SOLER - TEL : 68 92 60 79 15 


Editeur+Copieur+Exploreur la "a 
100% Langage Machine Pan 


Fenêtres & Menus Déroulants ex @UX qua V 
É U Un Editeur secteur unique qui vous 
permet de visualiser et de modifier 
piste LA ND sect. :0t L° gpDITE Le contenu de toute disquette, 


qu'elle soit protégée ou non. 


ste] 
e 
és 


DS Asa 


Jr 


Quatre modes d'édition combinant Ascii, hexa, décimal, octal, binaire. 


Eaaete 


Des capacités exceptionnelles que vous pouvez exploiter immédiatement : 
e Désassemblage direct des programmes en Langage Machine 
e Listage automatique des programmes Basic 
e Les outils de bureau : ciseaux, colle, calculatrice mathématique 


3 
LPSC TEE 


CRETE 
ÉEUSTE TE ete t 2212) 
nn D > Cage 
STESTENSRE 


—æ 


5 
à 
Al 
rl 
i 
à 


Toutes les possibilités à La portée du débutant comme de l'expert : 
e Récupérer une disquette endomagée ou un programme effacé 
(: Explorer un directory, le reparer, le modifier 
e Localiser des fichiers, les cacher, les visualiser, Les modifier 


Enfin la copie de sauvegarde pour tou vos 


COPIEU disquettes (et cassettes) protégées où pas. 


Comme l'Editeur, il reconnait 99 pistes, toutes 
les densites d'écriture, les pistes déformatées, Les 
secteurs non standard, effacés ou de taille anormale. 


Des performances inédites à votre service : 
e Réparation automatique des secteurs endomagés 
e Gestion automatique des extensions mémoire 


e Une fonction catalogue qui permet de copier des 
fichiers séparément sur cassette ou disquette. 


Voyage au centre de La disquette... 
REUR L'Exploreur de Discology fournit toutes 
les informations sur la disquette : 
Formatage, densité d'écriture, caractéristiques des 
secteurs, secteurs "plantés", plan d'occcupation des 


fichiers sur la disquette. 


Un outil passionnant pour découvrir tous Les 
secrets de vos disquettes et du controleur disque. 


Pour tous les "cracks" de l'Amstrad et ceux qui 
veulent le devenir. 


Discology est disponible sur disquette pour Amstrad CPC chez tous les très bons revendeurs. Vous pouvez aussi Le commander 
directement sans frais de port supplémentaires à : MERIDIEN Informatique - 11, rue Léandri - 83100 Toulon 
e Master Save est toujours disponible au prix de 190 F. IL reprend les caractéristiques du Copieur de Disquette de Discology 


e Si vous désirez recevoir Discology et que vous possédez déja Master Save, vous ne payez que la différence. 
O JE DESIRE RECEVOIR DISCOLOGY AU PRIX DE 350 F BON DE C 
© JE DESIRE RECEVOIR MASTER SAVE AU PRIX DE 190 F 


O JE POSSEDE DEJA MASTER SAVE ET JE DESIRE RECEVOIR DISCOLOGY. JE JOINS MA DISQUETTE MASTER SAVE ET JE NE PAYE QUE 160 F 


MON REGLEMENT : © CHEQUE QUE JE JOINS (LE PORT EST GRATUIT) © CONTRE REMBOURSEMENT (J'AJOUTE 25 F DE FRAIS DE PORT) 


NOM : PRENOM : 
ADRESSE : 
CODE POSTAL : VILLE : TEL (facultatif) : 


A retourner à : MERIDIEN Informatique - 11, rue Léandri - 83100 Toulon 


EXPLOITEZ 


VOTRE 


AMSTRAD 


le livre + la cassette 


103 Fac 


eux - Gestion 
Education - Domestique 
Impression de documents 


Un best-seller 


Bon de Commande 


à renvoyer à STAMP DIFFUSION, 
27, bd de la Fraternité - 44100 NANTES 
Exploitez votre Amstrad. 103 F - Port gratuit. 


Nom Prénom 


Adresse 
Ci-joint chéque de 103 F. 


1 ADRESSE : 
1 CODE POSTAL: 


FL — 


Si vous êtes lassés par vos 
jeux, ne les gardez plus, 
échangez-les contre des 

nouveautés ou des titres que vous 
ne connaissez pas encore avec: 


DUUMERANS 


BP 585 — 74014 ANNECY Cedex - Tél. 50.67.70.42 


VILLE : 


PROTÉGER VOTRE AMSTRAD 


TOUS LES SACS ET HOUSSES SONT ADAPTÉS A CHAQUE TYPE DE MATÉRIEL ET LES PASSAGES DE CABLES SONT PRÉVUS. 


D Sac pour Amstrad (clavier) 
PC 464[16640 61280 PCW 8256. 
oloris : bleu, gris ou sable. 

290 F TTC 


Q Sac pour moniteur Amstrad mono- 
chrome [1 couleur. [1 

Coloris: bleu, gris ou sable. 

PINS ultime 400 F TTC 


C 
C 


Les sacs pour claviers AMSTRAD 464 - 664 - 6128 comprennent 1 poche pour le clavier plus 1 autre du même volume pour y ranger les accessoires. 


IZARD Créations - 99 31 64 73 


PETITE P 


LE SEE CR 


27, Bd de la Fraternité 44100 NANTES 


Cochez 
bien 
les cases 
et 

“| couleurs 


D Housse pour Amstrad (claier) 
CPC 46406640 61280 PCW 82560 

Coloris: beige, blanc, bordeaux, noir, 
marron. 

PrIXE seras rase 130 F TTC 


D Housse pour moniteur Amstrad. he 


Coloris: beige, blanc, bordeaux, noir, 
marron. 
Prix scuniihréduss 130 F TTC 


POUR COMMANDER: Retournez-nous cette publicité en cochant le ou les pro- 
duits que vous désirez recevoir et en remplissant le bon ci-dessous. Pour les coloris, 


rayez les mentions inutiles. 


Pochettes disquettes 3°’ ou 3,5" 

D pour 1 disquette 29 FTTC 
O pour 6 disquettes .... 116 F TTC 
© pour 10 disquettes .. 150 FTTC 
D pour 32 disquettes .. 200 F TTC 
Coloris: gris, bleu ou sable. 


© Port PTT à ajouter au montant de votre commande: 25F 
© Joindre votre règlement par chèque ou mandat à votre commande. 


Signature: 


: C7 
1 . Je souhaite recevoir votre documentation sur le q 
: fonctionnement du centre Boomerang 


CS 


CALCULATRICE 


Philippe NGUYEN 


ourquoi faire simple quand on peut faire compliqué ? Avec le 
prix sans cesse décroissant des calculatrices de poche, payez 
vous le luxe de faire vos calculs avec l’'AMSTRAD. Look Macin- 


tosh garanti ! 


La calculatrice est présentée à l'écran 
avec un bref mode d'emploi. Une flèche, 
actionnée au moyen d'un joystick ou 
d'une souris permet d'accéder aux dif- 
férentes touches. Pour valider un chiffre 
ou un opérande, il suffit de placer la flè- 
che sur la touche correspondante et de 
‘’cliquer'” au moyen du poussoir du joys- 
tick ou de la souris 

Pour obtenir un fonctionnement correct, 
il faudra respecter les 2 règles suivantes : 
— entre chaque opération différente 
(addition, division...) ‘’cliquer'' la touche 


, 


10 ‘#æ##x#x Nguyen Fhil #3%3%36% 


pour procéder à un nouveau calcul, 
réinitialiser la calculatrice au moyen de 
la touche ‘CE’. 
Cette calculatrice permet la plupart des 
opérations et la touche ‘’#'" permet de 
quitter le programme. 
Suggestion : ce programme pourrait être 
intégré dans un ensemble plus vaste : 
tableur, traitement de texte, DAO etc. 
L'accès à la calculette pourrait se faire 
par l'intermédiaire de menus déroulants 
ce qui serait une bonne application du 
programme ‘MENU 2 +'' publié dans 
CPC n° 16. 


20 ##%%% pour CFC EX 

30 MODE 2:1INE 0,26:1INE 1,0:HORDER 26 

40 DEF ENcom(x)=INT(x#213/639/8) +1 

90 GOSUEH 980 

&0 DEG 

70 FOR. j=160 TO 288 STEF FOR i=80 TO 200 STEF Z4:g=i-2Z:d=i+i8:b2=j-4:h%=j+e 


O:GOSUB 920:NEXT:NEXT 


80 g=78:d4=218:b2=1716:h%=540:GOSUR 920 


90 g2=70:d4= 
100 g=éé:dz= 


226:h4=256:b4=140:GOSUE 
:b4=152:h%4=2:64: GOSUER 920 


920 


110 FRINT CHR (25) "1"3: MOVE 10.S5%8,302: TAG: PRINT"7 8 


Dos KO +"; 


120 MOVE 10.5%6,270:FRINT"4 5 6 — 23 

120 MOVE 10.5%8,228:PRINT"I 2 2%  "CHR$S(254)"  "CHRS(250)"  "CHRS (246) ; 

140 MOVE 10.5%8,206:FRINT"O , € GS  "CHR$(249)" TT"; 

150 MOVE 10.5%8,174:FRINT CHR$(253)" "CHR (252) " "CHR (2S1)"  "CHRSCESSD"  # 
a 

160 WINDOWH1.12,26,5,9 | 

170 FRINT#1,STRINGS(14,".")"0"; 

180 x=240:y=200:anx=x:ay=y:pasx=8:pasy=1lé 

190 MOVE x,y:TAG:FRINT CHR& (247) ; : TAGOFF 

200 LOCATE 50,2:FRINT'NNH research presente:":LOCATE 50,5:FRINT"Calculatrice de 
poche":LOCATE 50,7:FRINT CHRK#(164)" 1986..." 

210 LOCATE 56,9:FRINT"X Fonctions X':LOCATE 50,11: FRINT"#=fin C=scos S=sin" 


:LOCATE 50,12: FRINT"L=10g 


T=tan 
220 LOCATE 50,153:FRINT"'Ex=expon. 


At=arctan":LOC 
“<puiss." 


250 LOCATE 50,16:FRINT"+=add +=soust. =egal.":LOCATE 50,17:FRINT"'#=multi, :=d 
ivis.  Zpourc." 

240 LOCATE 50,18:FRINT"Deplac. souris où Joystick" 

250 g=48*6:d2=789#8:h4=17.5#16:b/=6*16: GOSUE 920 

260 g=48*x8-4:d4=78*8+6:h%=17.5#16+4:b%=6#16-60:GOSUE 920 

270 feu=0:WHILE feu=0:souri$=BIN$ (JOY(O),5):1F souri$:;"OG000" THEN GOSUE 510 
280 WEND 


78 


CALCULATRICE 


290 
500 
F10 
220 
250 
740 
250 
360 
2570 
380 


[IF (x2218 AND x:78) AND (y<2708 AND y#156) THEN GOSUB 400 ELSE GOTO £70 

GOTO 270 . 

IF MiD$(souri$,1,1)="1" THEN feuz=i:RETURN 

IF MID#(souri$,2,1)="1" THEN x=x:+pasx 

IF MID$(souris,:,1)="1" THEN x=x-pasx 

IF MID#&(sour1i$,4,1)2="1" THEN y=y-pasy 

IF MID$(souri$,5,1)="I" THEN y=zy+pasy 

IF x:614 THEN x=614 ELSE IF x293 THEN x«=S 

IF y:397 THEN y=:97 ELSE IF y<351 THEN y=31 

FRINT CHR$S (22) "1"s5: TAG: MOVE ax, ay: FRINT CHRS (247) 3: MOVE x, y: FRINT CHRSGCE47) 3 


: TAGOFF 


290 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
940 
930 
960 
970 
980 
990 
600 
610 
620 
6:30 
640 
650 


FRINT CHKS (25) "O"ssax=xs ay=y: RETURN 
SOUND 1,x+y,10:FOR i=1i TO 100: NEXT 
com=FNcom (x) —23 

FOR qw=1 TO. 100:CLEAR INFUT:NEXT 

IF. y*156 AND y:180 THEN 490: 'Seme ligne 
IF y+188 AND y:212 THEN 620: "4eme ligne 
IF y:220 AND y£244 THEN 710: 3eme ligne 
IF y:252 AND y#276 THEN 780: '?eme ligne 
IF y:288 AND y£512 THEN 850: 'iere ligne 
GOT 270 

ON com GOTO 500,510,520,520,540,550 
GOSUR 1090: M=T:KRETURN 

m=0 : RETURN 

nb=m:nb#$=STRS$ (nb) :GOTO 1080 
nb=0:nb$=""steO: flag=0: 0OPH="" SE FRINT#1, STRINGS(14,".")"O0"s 8: RETURN 
END 

IF op$="/" THEN t=t/nb 


IF op#$="X" THEN t=t#nb 


IF op$="+" THEN t=t+nb 
IF op$#="-" THEN t=t-nb 
IF op$=""" THEN t=t"nb 
IF op$="exp" THEN t=t"nb 


ON com GOTO 640,650, 670, 680, 690, 700 
nb$=nb$+"0":GOTO 1080 
IF flag=1i THEN RETURN ELSE IF nb$="" THEN nb$="0." :flag=1: RETURN:ELSE flag= 


1:nb$=nb$+"." ELSE RETURN 


660 
670 
680 
690 
700 
710 
720 

20 
740 
750 
760 
779 
780 
790 
800 
810 
820 

50 
840 
850 
860 
870 
880 
890 
900 


GOTO 1080 

GOSUR 1110:T1=COS (T1): GOSUB 11:20: NEH=T I: RETURN 
GOSUR 1110:T1=SIN(T1) : GOSUB 113503: NE=T 1: RETURN 
GOSUR 1110: TI=ATN(T1): GOSUR 11270: NE=T 1: RETURN 
GOSUR 1110: TI=TAN(T1):GOSUR 1120: NE=T1: RETURN 
ON com GOTO 720,720,740,750,760,770 
nb$=nb$+"1":G0TO 1080 

nb$=nb$+"2":GO0OTO 1080 

nb$=nb$+"7":GOTO 1080 

op$="exp":GOTO 1090 

GOSUB 1110:T1i=LOG(T1):GOSUR 1120: NB=T1:RETURN 
GOSUB 1110:T1=SQR(T1) : GOSUR 1170: NE=T 1: RETURN 
ON com GOTO 790,800,810,820,830,840 
nb$=nb#$+"4":G0OTO 1080 

nb$=nb$+"5":GOTO 1080 

nb$=nb$+"6":GO0OTO0 1080 

IF nb=O THEN nb$="-0"+nb$: GOTO 1080 ELSE op$="-":GO0OT0O 1090 
op$=""":G0OTO 1090 

GOSUB 1110:T1=T1/100:GOSUER 1120: NE=T1:RETURN 
ON com GOTO 860,870,880,890,900,910 
nb$=nb$+"7":G0OTO 1080 

nb$=nb$+"8":G6G0T0 1080 

nb$=nb$+"9":G0T0O 1080 

op$="/":60T0 1090 

op$="X":GOT0 1090 


719 


————— a — 


910 op$=t4+ts GOTO 1090 

DO MOVE G%,L%4:DRAW. G%4,H%4,1:DRAW D4,H%, 14 

GEO DRAW DY4,EH%, 1: DRAW 5%4,B%4,1:MOVE G4+2,R%4-2 

40 DKAW DA+1,H4-2, 1: DRAW DA+1,H4-2, 1: MOVE D4+2,EH%-2 
P5Q DRAW DA+2,H4-4, 1: MOVE D4+3, H4-2: DRAW D4+5,H4-6, 1 
960 MOVE GA-1,H4:DRAW G4-1,H% 

D7O RETURN 

990 SYMEUL 255,0,119,6€7, 70,68, 68, 119 

990 SYMEUL 254,0,224,128,201,134, 134,875 

1000 SYMBOL 257,0,144,242,146,151,146,146 

1010 SYMEOL 258,0,144,240,144,151,144,144 

1080 SYMBOL 251,151,245,150,149,144,151,148,151 

1080 SYMEOL 250,0,148,128, 128,129, 138,238 

1040 SYMEOL 249,0,222,172,252, 168, 168, 164 

10850 SYMBOL 248,0,7,126,126,80,80,22 

1060 SYMAOL 247,255, 120,122,122,1#0,177,203, 174 

1070 RETURN 

1080 nb=VAL (nb$) : FRINT#1, STRINGS (15-LEN (nb#),".")snb$3 : RETURN 
1090 IF flaq=1i THEN flag=0 ELSE t=nb 

1100 nb=0:nbt="": RETURN 

1110 LF flag=1i THEN FLAG=O:TI=T ELSE Ti=NE 

1150 RETURN 

1120 TIESSTRS C4) 2 PRINTHL, STRINGS (1S-LENCt1#),".")3t183 : RETURN 


sarl JAGOT et LEON 


17, rue des Alliés, 42100 Saint-Etienne 
Tél. 77.33.13.82 


MULTISERVI | PHARMA GESLOCK 


Boîtier électronique avec logiciel intégré réalisant 5 applications. 1 INVENTAIRE COMPLET FOURNI 
1 ALARME. AVEC TARIFS. 

2 SIMULATEUR DE PRESENCE. 2 REACTUALISATION ANNUELLE. 
3 PROGRAMMATEUR HORAIRE. 3 GESTION DE STOCK 

4 ANIMATION LUMINEUSE. PRINCIPALEMENT ORIENTE 

9 REVEIL PARA-PHARMACIE 


paix puguic : OO0 F paix ugic : 1490 F HT 


Pour CPC 464 (avec extension 64 K JAGOT et LEON) ou CPC 6128 
664 
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LES PRINCIPALES CARACTERISTIQUES DES IMPRIMANTES * PERFFORNABCE" 


a nn NOUVEAU 1€ 
mu Une imprimante professionnelle 
j! r votre É U VOTRE PC: Bus 
ICESSE X GETIX : re 


CENTRE COMMERCIAL 122/129/221/301 


CAPACITE MEMOIRE : 7 KO 
8 KO en option 
total 15 ko 


SELECTION DU PAS AISE (directement 
par touche, sans passer par le soft) 


MATRICE : 9x 9 (Pica haute vitesse) 
18 x 24 (Pica haute densité) 


Interface = CENTRONICS PARALLELE 


RS 232 C (option) 
NOMBRE DE COPIES : 1 original + 3 doubles [| [1 0û HT 


Possibilité d'adapter un chargeur automatique feuille à feuille! 


RUBAN : infini en cassette er Î { Oh | Ïl C fi 
Impression : Bidirectionnelle 
POLICES de CARACTERES SUPPLEMENTAIRES (mémoires enfichables ) 


Son PRIX :AR 50 = 5000,00 francs HT soit 5930,00 ttc 


AR 55 = 6000,00 francs HT soit 7116,00 ttc 


TURBOEXPERT BASE 
249,00 francs 


TURBOEXPERT BASE est un système expert d'initiation, simple d'emploi, écrit en À 
Turbo Pascal. Il permet de travailler en chainage avant et arrière. 

11 comprend un moteur d'inférence, un éditeur de régles et un éditeur de fait 
Trois versions sont prévues : 


Enfin ne interface 
Lyrainent télénatique | 
Pour votre PCH..., 


1200,00 francs HI 


Commrcialisé par LOISITECH, VT LINK est composé d'un manuel, d'une 
terface et d'un logiciel souple d'utilisation, et très puissant. 


- une version CPMX 2.2, utilisable sur CPC 464 disquette, CPC 664 et 6128, 


permettant de gèrer une quarantaine de règles, Avec VTLINHK, il devient possible de gérer au mieux les possibilitées du 
minitel. 
- une version CPX+ 6128, permettant de gérer 150 règles. 


De puissantes fonctions vous sont offertes 
- une version CPM+ PCW, permettant également de gèrer 150 règles. 

— Saisie rapide des touches 
spéciales ENVOI, REÉEPETITION.. 

— Envoi de blocs de texte 
préselectionné 

— Reception de blocs de texte 

— Controle des pages du minitel sur 
le PCW 

— Simplicité des copies d'écran 


- La version CPM 2.2 est disponible dès ce mois-ci. 
PRIX des deux premières versions : 249F 


Remises à jours CPM+ 6128 gratuites. Manuel d'initiation aux systèmes experts 
offert avec le logiciel. 
- IURBOEXPERT BASE est un produit coëdité par LOISITECH & PETREL 


copyright 1986 


La conception de l'interface qui equipe VILINK et le logiciel qui la 
gère permet ces performances. 


Véritable langage expert... Dm mu a rl per An PRE en 


interface. 


Qui vous pernet d'apprendre! EE 


MINITEL ET LE REND PLUS PRODUCTIF. 


* réglenent exclusivement en chéque ou nandat-lettre à RE LE AT li on de Cohnante AOCUMAENTATION Æ 
SOCIÉTÉ LOTSLIEUR A 


m1 PREN 


Centre commercial "Terminal 93" | vsiéie mn 


envoi contre- nn Rain es ALBI EE ter net 
33106 ONTREUIL-CEDEX re ADRESSE A 
TEL, (148 59 72 76, RE 


SERVEUR. (1)48 59 17 17 me-msmumen(] Joint Un Chèque d'acompte de 300F.à la 


AR 55 = 2059,00 francs HT 


a COftande le solde en contre-renhoursenentx 


MICRO - C 


3, bd de Beaumont 
35000 RENNES 
Tél. 99.31.76.41 


ÉDUCATIFS sur CPC 


@ ÉQUATIONS (3°, 2°) 200" 
© GÉOMÈTRIE PLANE (3° àterm.) 200" 
@ESPACE ET SOLIDES (2°àterm.) 200 
@ MATHS - SECOND CYCLE 250" 
e MATHS -54 (5° à 4°) 200" 
@ MATHS- 6 (6°) 200" 


UTILITAIRES (sur DQ) 


© CHERRY PAINT, PROMO 280 160 


ENFIN UN SPECIALISTE 
S'INSTALLE DANS LE 93 11 


AHSTRAD xx COHHODORE 
THOHSON xx H.S.X 


REPARATION TOUTES HARQUES 


DELAI 7 JOURS mu Forfait 


Où devis ,n'attencdimz plais ! 


XPROHOTIONS D'OUVERTURE* 


logiciels a partir de 35 
disquette 3 pouces... 2 
Joystick quikshotIlI.. 
ordinateur HS5X 


5 rue CHARLOT 93700 DRANCY 
TT 1 oo 0! eRAMDISK (CPC 6128 
du MARDI au SAMEDI et 464 avec DKtronics) 190" 
© PCW PAINT (D.A.O. sur PCW) 350" 


JOINDRE CHÈQUE A LA COMMANDE 
+ 3 TIMBRES À 2,20 F 


34, rue de Turin 
75008 PARIS 


Tél. (1) 42 93 47 32 
Ménes : Rome, Liège, SOUS QUELLE 


y Ÿ 
St-Lazare, Place Clichy. \ 3 \\NI ETOILE 


17 SUIS-JE NE _? 
DISQUETTE J 


290 F. 


La disquette double-face 


MIROIR 
ASTRAL 


Avec une date, une heure et un lieu de naissance, 

votre CPC établira un portrait psychologique 

approfondi d'environ 15 pages sur imprimante ! 

Un logiciel qui vous étonnera par sa profondeur ! 
(version familiale d'un logiciel utilisé par les professionnels) 


Astropsychanalisez votre famille,vos amis, 

comme les plus grands hommes célèbres. 

Commandez votre disquette pour CPC 6128 ou CPC 664 
(PORT GRATUIT) à : 


Bernard VILLEMIN 
317, Av. de Verdun - 83110 SANARY - Tél. 94 74 32 00 


dcr? ÿ TH 175 
Coffret de rangement 
10 disquettes 


28 F 
POURAMSTRAD" | 


EN PROFITANT DE NOS PROMOTIONS 


© 1TH175 + 10 DISQUETTES 3” 329 F 
© 1TH172 + 20 DISQUETTES 3” 690 F 


ue DISQUETTE SEULE 3 {minimum 10 pièces) 30 F PRIX TIC 


ui n’a déjà entendu parler de ces fameux objets fractals ima- 

ginés et mis en évidence par B. MANDELBROT, sujet large- 

ment commenté dans les revues lors de la lancée des ordina- 
teurs familiaux. Les jolis motifs créés en haute résolution ressem- 
blent à des dragons ou des pommes-mâles qui font leur apparition 
dans des échelles de plus en plus petites. 


Vous allez peut-être dire que tout cela est 
trop connu et que le temps d'exécution 
des programmes générant les fractals sur 
un ordinateur muni d'une CPU à 8 bits 
rebute tout le monde. 

Effectivement, l'emploi du Basic est 
exclu à cause de la lenteur d'un langage 
interprété. Même les réalisations en lan- 
gage machine demandent souvent plus 
d'une heure pour créer un seul écran. 
Un nombre exorbitant d'opérations en 
virgule flottante est en effet nécessaire 
pour déterminer la couleur de chacun des 
64 000 points en mode graphique. 

Or les routines de calcul sont difficile- 
ment programmables en langage 
machine. 

Notre choix s'est donc porté sur un lan- 
gage rapide et évolué, le Turbo-Pascal, 
disponible également sur AMSTRAD 
CPC et AMSTRAD PC. Et comrne les 


opérations concernant les variables 
entières sont ultra-rapides, pourquoi ne 
pas éviter complètement le calcul en vir- 
gule flottante ? 

Expliquons d'abord l'algorithme 
employé : 

Nous partons d'un point aux coordon- 
nées (x,y}), posons xn:= x, yn:=y et ini- 
tialisons un compteur PROFONDEUR qui 
décrit le nombre d'itérations. 

Un nouveau point est calculé de la 
manière suivante : 
xn:=(xn+yn)x{(xn—yn) — x 
ÿni=2»:xn#yn — y, 

et le procédé se répète jusqu'à ce que 
abs(xn)+abs(yn) dépasse une valeur 
donnée, par exemple 511 ou encore 
1023. 

À ce moment-là, nous prenons la valeur 
du compteur j modulo 4, soit O, 1, 2 ou 
d. 
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Ce nombre indique le numéro de plume 
qui servira à marquer en couleur le point 
de départ (x,y). 

La version prévue pour l'AMSTRAD CPC 
est exécutable sous CP/M 2.2. En tête 
sont définies les procédures graphiques 
PLOT, GRAFPEN et INK. Les heureux 
possesseurs d'un module graphique peu 
vent se passer de cette partie. 


program fractals: 
var 

profondeur, “,y: 1nteger: 
ch: char: 


<CF/M 2:2 AMSTRAD extension graphique} 
const 
bc:integer = $7F85: 


procedure callrom: 


begin La fonction ITER fournit l'encre de la 
inline( plume graphique utilisée pour tracer le 
$D9/$ED/$4B/bc/$D9 point actuel. 


)3 


Tapez vite ce petit programme et vous 
end: 


allez admirer la vitesse inouïe du Turbo 
Pascal : 


proregure Or 1g1n (xs yaLnteger: 12-13 minutes pour un écran en mode 


begin : : È 
callrom; <eliminer sous CF/M 3.0} 1 comprenant 64 000 points à colorier 
inline( individuellement, soit d'environ 10 mil- 

$TA/x/$EER/$2A/y/ lions d'opérations d’addition, de multipli- 
$CD/$C9/$EEH cation, de décalage ou de comparaison 


)sisous CF/M 3.0 $CD/$5A/$FC/$C9/$EB} 
end; 


à effectuer. Ce n'est pas négligeable et 
les dessins sont remarquables, même 
s'ils sont connus. 


procedure: plots, yVsznteger): Voici le programme et quelques échan 


ru tillons . 
calirom: 
inline( 
S2A/*x/%ER/$20/y/ __a__hnn nes 
| Ce Une dernière remarque : si le Turbo vous 
ends : intéresse et si vous aimeriez savoir 


comment nous avons réalisé les recopies 
d'écran sur imprimante, consultez le livre 


procedure gratpen(pl:byte);: 


begin TURBO-PASCAL sous CP/M 80, de P. 
callrom: M. BEAUFILS et W. LUTHER aux Edi- 
inline( tions Eyrolles, Paris. 

$:A/p1/ 
$CD/$DE/$BE 


)3 


end; 


procedure ink(pl,pli,plZz:byte): 

begin 
write(#28,chr (pl).chr (pl1),chr{(p12))3: 

end: 

{fin module graphique CFC} 


function iter: 
var 

xXNn,yn, a.b,c,d,): integer: 
begin 

J:=profondeur : 

XNE3=X3 YNIZ=Y:S 


byte: 


repeat 

a:=xn-yni;b:=xnt+ynid:=xnxyn; :=a#b; 
1f c>=0 then xn:=c shr 6 — x 

else xn:= —-(abs(c) shr 6) — x: 

1f d>=0 then yn:= d shr S -y 

else yn:= -(abs(d) shr 5) — y: 


3:=pred(J) 

until (1=0) or (abs(xn)+abs(yÿn) >1027);: 
iter:= 1 mod 4 
end; 


begin 
profondeur : =20;: 
write(#4,#1): {mode 1, FC: graphcolormode} 
ink(0,26,26): 1nk(1,12.12)5 ink(2,6,6): ink(3,0,.0): 
{FC: palette(:): graphbackground(O); 
origin(320,200);{seulement CPC: 
for x:=-160 to 159 do 
begin 
for y:=-1900 to 99 do 
begin 
grafpen(iter):; plot (2*kx,2ky) 
{PC: plot (x+160,y+100,1iter)7 
end 
end; 
read(kbd,ch):write(#4,#2) 
imode 2, FC: textmode} 


end@ 
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UCB ? Micro club Tél : 48 67 66 01 


Presse spécialisée unanime... 
Déja 5000 cours distribués... 


COURS D'AUTOFORMATION SUR TRAITEMENT DE TEXTES AMSTRAD 
Possibilité de le consulter pendant l'utilisation . ........ 390 Frs TTC 


COURS AUTOFORMATION BASIC oo; 464/664/6128 


CASSETTE : 115 rs 


BASIC et CPM + 


DISQUETTE : 215ñrs 


Disquette 3 pouces = : 35#s 


COMPILATION 
SUR LA MEME DISQUETTE 


pie + Cours autofor mation basic 
où: + Simulateur de voile DAMSTAR 
D? « Pour vos enfants, apprenez leurs 
° le calcul et l'heure - 


Manette de jeux : QUICK SHOT  : 65: 


COURS D’AUTOFORMATION BASIC 
SUR PCW : 290 F 


Un magasin est à votre disposition, avec les dernières nouveautés au centre 
commercial BOBIGNY 2 Tél. 48.31.69.33 


Nous vous remercions d'adresser vos commandes accompagnées d'un chèque 


à l'ordre de: VCB2 GARONOR 99 BP 320 


DESCRIPTION 

FENDISC est un utilitaire de gestion de 
fenêtres sur disquette (ou cassette) écrit 
en assembleur. ll permet la sauvegarde 
et le chargement de fenêtres d'écran 
délimitées par les lignes et colonnes 
alphanumériques, et non pas pixel par 
pixel - ce qui aurait compliqué et allongé 
presque inutilement le programme. En 
effet, FENDISC convient à la plupart des 
applications qu'on peut trouver pour un 
gestionnaire de fenêtres sur disquette : 
par exemple la gestion des graphismes 
dans un jeu d'aventure où il faut repré 
senter plusieurs situations dans un même 
paysage {porte ouverte ou fermée, objets 
cachés ou visibles). De plus les dessins 
seront sauvegardés pius rapidement 
qu'avec une copie complète de la RAM 
écran (important pour les lecteurs de cas- 
sette) et surtout plus économiquement 
puisqu'un dessin n'occupe généralement 
pas l'écran entier (même dans ce cas, 
une copie de l'écran entier occupe 16K, 
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et non pas 17). Le programme fonc 
tionne sur les CPC 464, 664, 6128 et 
dans les trois modes d'écran (on peut 
également sauver une fenêtre dans un 
mode et la recharger dans un autre mode 
-elle sera bien sûr un peu transforméel. 


UTILISATION 
FENDISC est donné une fois en BASIC 
sous formes de DATAS et une fois en 
assembleur (Hisoft DEVPACI. Il a été 
placé à l'adresse 30000 et n'est pas relo- 
geable (pour les possesseurs d'un 
assembleur, il n'y a qu'à changer le ORG 
30000). Le programme fait 465 octets 
de long, mais il faut laisser libres les 2 
K consécutifs au programme qui sont uti- 
lisés comme buffer disquette (ou 
cassette). 
Depuis le BASIC, la syntaxe de la routine 
est la suivante : 
CALL 
che,droite,haut,bas 
pour sauver la fenêtre (a$ contenant le 


30003, a$,gau 


FENDISC 


nom du fichier) 

et CALL 30000, a$,gauche,haut 
pour charger la fenêtre a$ à n'importe 
quel endroit de l'écran. 

Si l'on exécute un CALL 
30000, a$,0,0 la fenêtre a$ sera char 
gée à l'emplacement où elle avait été 
sauvée (ceci grâce aux paramètres sau- 
vés en même temps que la fenêtre). 
llest indispensable que le nom de fichier 
soit transmis dans une variable car CALL 
n'accepte comme paramètres que des 
nombres de 16 bits maximum (or 
l'adresse de la variable a$ - a$ - est jus 
tement un nombre de 16 bits). 
FENDISC est aussi utilisable directement 
depuis l’assembleur pourvu que l'on ini 
tialise correctement les variables. 


LE PROGRAMME 

Le programme est auto-documenté, ce 
qui devrait suffire à ceux qui désirent 
l'améliorer (la structure du programme 
n'étant pas très complexe). 


10 MEMORY 2 1086 LATé SS,IL,CR,27,CR,27,CB,27, 935 
20 FOR adrz% 1DÜ 20464 1090 DATA 22,08,77,34,03,77,CD,95, 711 
F0 READ octésoct=VAL ("E"+oct$) :FÜFE adr, 1109 DATA BC,274,05,77,CD,95,BC,3A, 970 
act 1110 DATA 07,77,0D,95,RC,134A,08,77, B53 
40 sumi=sumitoct 1120 DATA CD,95,BC,CD,E4,76,:A,08, 1159 
30 IF adr MOD S=7 THEN READ sum: IF sumi 11:50 DATA 77,47,C5,7à,07,77,47,C05, 829 
=sum2 THEN sumi=9 ELSE FRINT'erreur en 1 1140 DATA 7E,47,C0D,20,6C,78,E5,CD, 1176 
igne "; (adr-20007) /8#10+1000: END 1150 DATA S5S,BC,E1,C1,10,F1,2A,09, 106% 
80 NEXT 1160 DATA 77,CD,24,8R0C,22,09,77,C1, 905 
70 SAVE" #fendisc.bin",b,2:0000,465 11/70 DATA 10,E0,CD,8F,EC,C9,DD,2E, 1241 
80 END 1180 DATA DL,2B,DD,2E,DD,2B,CD,50, 1077 
1006 DATA CS,RE,75,0CD,30,76,CD,F2, 1233 1190 DATA 746,234,04,77,:2,05,77,47, 544 
1010 DATA 7&6,0D,72,/6,FD,£A,01,77, 970 1200 DATA 34,07,77,E0,32,08B,77,F5, 781 
1020 DATA D nes 104: 1210 DAIA ZA,05,77,22,04,77 7,5A,05, 4ié 
1630 DATA a ,LD,EC,BC, DO, 861 1220 DATA 77,:4,06,77,C4,F5,76,F1, 109% 
1040 DATA 2A,0%, *3C, 793,20,32,07, 554 II0 DATA C4,72%,76,FD,2A,01,77,FD, 1094 
1050 DATA 77, CD, 11, EC “011,60, 917 1:40 DATA 48,00,FD,6E, …. FD,66,02, 791 
1960 DATA FE,76, 06,02, BB, DC, FE, 76, 113€ 1250 DATA 11,00,77,CD,77,BRC,DO,3A, 9276 
1070 DATA ?D,72,07,77,2A,05, 77,70, 37 2h06 DATA en SH1b 


279 Dal EL,CL, au, EC, CZ, 16,76,Cb, 1:54 1450 DATa QG, 26, 07,77,Eu,b8,2s,76,. 854 
1280 DATA 80,HC,22,0%,77,CD,80,BC, 1009 1449 DATA 2A,05,77,E8,D4,H6,76,2:ñ, 944 
1250 DATA 3,05, 77,CD,80,ÉC, 32,07, 752 30 DATA 06,77,47,3E, 18, ne 668 
1:00 DATA 77,CD,80,BC,22,08,77,CD, 1022 1460 DATA 76,24,03,77,47,2A,04,77, 550 
1210 Data Ed4,78,2A,08, 17,47,C5, A, 857 1470 DATA EB,DA, 88,76, :A, 0577, 47, 957 
1330 DATA a EC, 1144 1480 DATA 3A,06,77,BB,DA,R8,76,C9, 1088 
LEA DATA .E1,77,CD,70,BC;C1,19,F3, 122 1490 DATA 21,CA,76,06,1A,C5,7E,23, 743 
40 DATA ne 09, 644 1560 DATA ES,CD,SD,BB,E1,C1,10,F5, 1393 
1250 DATA ie étre D . FALEC,C9, 1276 1510 DATA se C9,45,72,72,65,75,7%, 1071 
160 DATA Db,68,0$8,DD,6E,08,22,01, 706 1520 DATA 20,64,61,6E,72:,20,6C,65, 695 
20 DATA 77,DD,7E, ue pb 865 1570 DATA 7s 20170 61172, 61,6D,65, 777 
1:40 DATA /E,64,72,04,77,DD,7E,02, 652 1540 DATA 74,72,65,73,3A,03,77,67, 729 
1550 DATA #3,77,DD,/E,00,%2,06, 577 1550 DATA ZA, _ 6F,CD,1A,BC,22, 746 
‘14uo DATA 77,09,CD,11, BC, 2E, 14, D4, 1508 1560 DATA 09,77,09,21,03,77,25,2%, 572 


1410 DATA FE, 76,06,07,88,CC,FE, ce 1140 1570 DATA 25,223,25,22 C9,CE,25, 670 


15,27,29,25,29, 


1420 DATA 34,04,77,ED,D2,E8,76, 803 1566 DATA CV@ 


10 MEMORY £occosLUAL"tendisc.bin" ee par un CALL 30000, 8a$,0,ç0" 

Gr MODE ZE 110 CAL T00G0, 624,0, 0 

IG FOR 151 Ti 50 120 CALL SBEVe 

ju MOVE KRND4540,KkHD4#400: DRAW RND#640,RNL i20 CLS #1:FRIN1#1,"Dn la recharge aille 
* 400 urs avec un CALL 20000,6Ga$,45,14" 

30 HEXT 140 CALL 30000,@at,45,14 


ET. 


&Q a%="essai.fen":CALL 20007,@a$,15,40,1 50 CALL -2EE06 


1,19 150 MODE 1:FRINT"En mode 1" 

70 WIMDOW #1,1,80,1,1 1/0 CaLL 20000 ,€a$,0,0 

gun CLS #1:FRINT #1,"La fenetre a ete sau 180 CaLL 2BB06 

ver." 190 MODE OG:FRINT"'ET en mode 0" 
90 CALL 2HB06:CLS 200 CALL 20000, €af,5,7@ 

100 FRINTHI, "ELLE ect maintenant recharg 


10 3FENDISC.ASS v 2.4 560 LALLON: scalcule hauteur en pixels 
20 3: 570 LD HL, (HAUT) :L=HAUT et H=EAS 
30 routine sauvant et chargeant sur disquette une tenetre d'erran 580 LD A,H 
40 ;limitee par les lignes et colonnes alphanumeriques. 590 SUB L 
50 à 600 iWC 4 3A= BAS-HAUT+1 
b9 sklle fonctionne dans les 3 modes. 610 SLA À 
/0 à CN SLA A 
#0 ;Syntaxe depuis le BASIC: 6:0 SLA AÀ 3*8, car B lignes ds 1 car. 
90 3 6 640 LD (LIGNES) ,A 
100' :CALL adresse+3, @af, gauche, droite, haut, bas pour sauver la fenetre 650 : 
110 set CALL adresse, Gaf, gauche, haut pour la charger PURE 
120 3 af doit contenir le ndm de la fenetre 8/0 SAVFAK: ;sauve parametres pour LDDISC 
1500: 640 LD A, (CGRUCHE) 
140 ;lors du chargement un LALL adresse, @af, 0, O replacera 690 CALL SAVOCT 
150 ;la fenetre à l'endroit ou elle avait ete sauvee. 700 LD A, CHAUT) 
160 710 CALL SAVOCT 
1/0 à 120 LD A, (LARG) 
180 3 Laurent FONCIONT - 17/08/86 7:0 CALL  SAVOCT 
190 3! 740 LD  A,(LIGNES) 
200 3 750 CALL SAVOCT 
210 ORG 20000 °760 à 
770 CALL OCTETI 5 HL = octet haut-gauche 
JP LDDISC 740 3 
û 150 3 
SAVD ESC: BO0 ;sauve avec deux boucles 1mbriquees 
CALL INII #19 sboucle interieure: chaque ligne LARG octets a sauver 


sboucle exterieure: LIGNES lignes 
CALL LOGFHY 
LD A,(LIGNES) 


CUALL TESTI svalidite des parametres LD B,4A snbre lignes 
s : 860 LUN: sboucle exterieure 
OFNOUT : ouverture du fichier 870 FUSH BC 
LD IY, (NOM) 880 LD A, (LARG) 
LD B,(IY+0) snbre car. du nom de fichier 890 LD E,A snbre octets de large 
LD L,CIY+1) 900 LUDF ZE: sboucle interieure 
LD H, C(IY+2) :HL = adr. du nom de fichier 10 FUSH RC 
70 LD DE ,HUFFEK 920 LD A, (CHL) 
al CALL #HC8C :DISK OUT OFEN 9:30 LD B,A ssauve À 
290 KRET NC serreur a l'ouverture 940 CALL #HC20 soctet ecran suivant dans HL 
.400 4 x 950 LD A,B . srecupere À 
410 CALLAR: scalcule largeur en octets Ye0 FUSH HL 
420 LD HL, CHAUCHE ) :L=GAUCHE et H=DROITE 970 CALL SAVOCT 
aïo LD A,H4 5 980 FOF HU 
CET SUE L 990 FOF RC 
450 INC A 3A= DROITE-GAUCHE+1 1000 -DJNZ LOOF: 
460 LD (LARG) ,4 1910 à 
470 CALL GETMDE 100 LD HL, CADK1) 
LD HL, (LARG) :L=LARG 10:20 . CALL #HC26 sadr. ecran sous adr. HL 
CALL C,MULIE 3S1 MODE © 1040 LD ADR 1) ,Ht 
LD B,% 1050 FUF HE 
CF EH 1060 DIJNZ LOOF? 
CALL C,MULT2? :S1 MODE O ou MODE 1 10/0 5 
LD AL 100 5 
LD AG) A 1090 CALL #ERC8F :DISE OUT CLOSE 
1100 HET | sfin de SAVDISC 
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1110 à 27$0 TESTS: 581 DROITE < GAUCHE où HAS < HAUT 
1120 2360 LD A, (GAUCHE) 
1150: 70 LD E,A 
er PRISE «80 LD A, (DROITE) 
1160 LA Es Ë 
1170 2400 Jr C,ERREUR DROITE — GAUCHE o 
1180 sdeux parametres de moins “410 LD A, (HAUT) 
1190 : 2 LD E,A . 
LD A, (DROITE) 2450 ÉD: <AntBAB) 
LD CHAUD) ,A j2ieme param. =HAUT (pas DRUIIE) an. ÉPo “8 È : 
LD,. &,A 2 30 Je. C,ERREUR HAS - HAUÏ < © 
LD A, (GAUCHE? San : FE? 
Fe PE : entame ies te a 2480 ERREUR: jsortie du message et retour HAHIU 
160 EUSH AË ranger flag 2 2379 LD HL, ABLE ù . 
1220 LD A, (GAUCHE) 2800 7 LD  H,26 snbre car. dans IAHLE 
1280 LD (DROITE) ,A De PE tte 
1290 LD A, (HAUT) FUSH:EC 
1300 LD  CBAS),A ipour abuser les tests ÉDi AS 'CAE) : 
CALL NZ, LOGFHY iconv. coord. logiques- physiques INC FHE Sacs QuivanEe 
FOF AF gretour #laq 2 FOSHNNE 
CALL NZ,TESTI spas de test s1 CALL aor,@af,0,0 ALL PRINT 
2 . FUF  HL 
É : ; : L E FOF RC 
OPNIN: +5 ET souverture du fichier jecture 2590 DINZ LOOP1 
LD B, (QY+0)° bre Cats du RON dati CT er 2600 FOF  AF spas de retour a routine appelante 
LD L'CIY+0) 2610 RET imais retour au BASIC 
‘ LD H,(IY+#2) 5 HL = adr. du nom ne +ichier tabt ES 
1400 LD DE,BUFFER de ; 
1410 CALL #BC77 : DISK IN OFEN DEFM, “ÉTraUr. dans. Les 
1420 RET NC jerreur à l'ouverture DEPUIS paranetr est 
1430 à 
1440 LDFAR:. scharge les parametres: : 
1450 L A, (FLAG) FACE 
1460 : OR A ; 3 2690 ULIR 113: scherche atresse de L'oct Mail Lis 
1470 JP  Z,SUITE scharger GAUCHE et HAUI ED: TA CBAUCHE 
1480 CALL LDOCT LD: "HA 
1490 CALL LDOCT . scharg. bidon car deja parametres 2 A3 HAUT? 
1500 JF SUITE? ED LsA 
1510 à CALL. #EC1A sadresse ecran colonne H jique 
1520 SUITE: CALL LDOCT LD CADK1) ,HL 
1530 LD (GAUCHE) ,A RE? 
1540 CALL LDOCT : 
1550 CHAUT) ,A d 
1560 LDOCT cl + 
1570 (LARG) ,A 2800 LOBFHY: sconversion Coor. logiques — ot "que 
1580 CALL LDOCT 24H10 LD HL , GAUCHE 
1590 Co (LIGNES) ,A 2870 DEC (HL) 5 GAUCHE = GAUCHE — 3 
1800 ; 2830 INC HL 
; s hs = 2840 DEC (HL) 3 DROITE=DRO1TE-1 
1230 CALL OCTET1 soctet haut-gauche 2850 INC -HL 
2460 DEC (HL) 4 HAUT =HALJ 1-1 
H 24H70 INC Hi 
Fes icf. schema sauvegarde de la fenetre 2H DEC (HL) : BAG= HAS) 
1660 LD A, (LIGNES) Soie à GA 
1670 LD B,A snbre lignes 2910 2 
16H06 LOUF4: iboucle exterieure AS 
1690 FUSH BC DDR RE net 
1700 LD A, (LARG) SOU ULEt 
1710 LD H,A snbre octets de large ECEirS FES E 
1720 LOOFS: sboucle interieure 2620 " 
1750 FUSH RC = À 
1740 FUSH HL : 
1/0 UALL LDOCI NOM: DEFW 0 
1760 FOF HL GAUCHE: DEFE © 3: GAUCHE ,DKOIÏTE,HAUI et HAS doivent 
1770 LD  (CHL),A DRO1TE: DEFE © setre places consecutivemen 
1/40 CALL #KHC20 soctet ecran suivant dans HL HAUT: DEFE OQ , 
#90) EUF BC HAS: DEFH 6 
1400 DINZ LOUFS 2040 LARG: DEFR slargeur de la fanetre en octele 
1410 3 030 LIGNES: DEFE © shauteur de la fenetre en picels 
1820 LD HL, (ADR1) s 5060 DEFW © sadr. octets gauches de la tenetre 
1450 CALL #BC26 sadr. ecran sous adr. HL 470 DEFB 0 
1840 LD CADR1) ,HL 3080 FRINT:  EOU  #BRESD 
1H50 FDF EC 090 GETMDE: EOU  #EC11 :SCREEN GET MODE 
1860 DJNZ LOOF4 2100 SAVOCT: EOU  #EHC95 3DISF OUT CHAK 
1870 3 110 LDOUCT: EU #ECB8O 4DISF IN CHAR 
1880 : 5120 BUFFER: DEFS #800 espace reserve pour ecrilure +tichier 
1890 CALL #EC7A 3DISK IN CLOSE 
1900 HET stan de LDDISC 
19105 Il 
1920 3 
1910 3 
1940 INIT: sinitialise variables emises par LALL 
1950 LD H,(IX+9) ; 
1960 LD L,C1X#8) 
19/0 LD (NOM) ,HL À 
1980 LD A, CIXx+6) 
1990 LD (GAUCHE) ,A 
2000 LD A,(IX+4) 


LD (DROITE) ,A 
LD A,(1X+2) 
LD (HAUT) ,A 
LD A, CIx+0) 
LD (BAS) ,A 


2060 RET Il 
2070 3 
2080 
2090 
2100 TEST1: 3ERREUR s1 colonne droite hors ecran 
2110 CALL GETMDE 
2120 LD L,20 
2130 CALL NC, MULT2 381 MODE 1 ou MODE 2 
2140 LD B,2 
2150 CP B 
2160 CALL Z,MULT2 381 MODE 2 
mn = 
2170 LD (DROITE) : DNS See 
F1 1Le#20,40 ou 80 suivant MODE 
2190 JF  NC,ERREUR si DROITE > 19,39 ou 79 RSS ARENA MERE || 
22700 + 
TEST2s LC me l 
LD H,0 
LD A, (GAUCHE) | 
CF B 
‘JP C, ERREUR GAUCHE < O 
LD A, (HAUT) 
CF L] 
JP C,ERKREUR HAUT < © 
LD A, (BAS) 
LD B,A 
Ê LD A,24 jlignes 0-24 
UF E 
JF C, ERREUR 5; HAS 2à 
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“Maintenant, j'aimes 
entrées  partou “ 


ALIENOR II 


Mise que j'ai mes entrées sur IBM PC et compatibles, je 
vais devenir la coqueluche du monde des ordinateurs ! 

Mon programme de comptabilité est complet et performant. En 
plus j'ai le contact facile : à travers l’écran, j’établis une relation 
directe avec l’utilisateur. Pas besoin d’être un crack de l’infor- 
matique ou de la comptabilité pour oser m’aborder. Suprême 
délicatesse : mes 4000 frères jumeaux déjà sur le marché ont eu 
l'élégance de ne pas ruiner leurs acquéreurs. Rapides, efficaces et 
discrets, le «tout informatique» ne peut plus se passer de nous. 


LOGICYS 


Les clés de l'efficacité 


CENTRE EMERAUDE. CIDEX 47, 33150 CENON. TEL. 56.40.94.75 


Le Ultimate Fight est un programme qui se joue à deux (profi- 


tez en pour inciter vos amis). 


Le but du jeu est d’arriver à tuer votre adversaire qui vous a pro- 
voqué en duel. Vous vous êtes donc donné rendez-vous dans le 
désert. Armé d’un révolver pour tuer votre ennemi, vous devez lui 


tirer 10 balles dessus. 


Mais il faut attendre que le canon se refroidisse entre deux tirs et, 
à chaque fois qu’un des joueur est touché, le tableau change et 


lorsqu'un des cow-boys est mort vous avez droit à 


animation. 


EXPLICATIONS DU PROGRAMME 

Ce programme comporte, comme vous 
avez pu le constater, de nombreuses rou- 
tines en assembleur. 

Il y a tout d'abord une routine qui per- 
met d'afficher des sprites colorés. Cette 
routine, pour une rapidité plus grande, 
accède directement à la mémoire écran 
et affiche des sprites pré-encodés de 
taille quelconque. 

Il'est indispensable que l'écran n'ait pas 
subi de scrollings, son accès se fait par 
un CALL &A400,NS,X,Y où NS est le n° 
de sprite, X la colonne et Y la ligne. 

IL y a également une routine qui s'appelle 
par un CALL &A402,NS,X1,Y1,X0,YO 
qui efface le sprite n° NS en position - 


X0,YO et le réaffiche en X1,Y1. Mais La 


l'une des routines les plus importantes 
de ce jeu est certainement celle située 
en &A100. En effet c'est elle qui fait 
tous les tests lorsqu'une balle est tirée. 
Elle fait avancer la balle d'un caractère, 
vérifie si elle heurte un obstacle (si c'est 
le cas elle décrémente le compteur de 
l'objet et si celui-ci atteint O l'objet est 
effacé) et teste si la balle sort de l'écran. 
Cette routine gère en même temps les 
balles des deux joueurs ce qui permet 


90 


une belle 


une plus grande équité, c'est grâce à 
cette routine que le programme est aussi 
rapide. 


Les CALL &BB4E servent à ré-initialiser 
l'écran (suppression du mode inverse), 
les PRINT CHR$(&30 + NBR) ; permet- 
tent d'afficher un seul chiffre sans effa- 
cer les caractères voisins. 

Dans les lignes 400 et 410 les IF THEN 
IF THEN permettent de ne pas ralentir 
inutilement le jeu si personne ne tire. 
Les nombreux POKE et CALL &A300 


(] L 
2i1PP / 


ATAMBitrIr- 
K XX % *X *X * 


& © 


FROGRAMMATION : 


GRAFHISMES : 


servent pour initialiser les paramètres de 
la routine de gestion de balles. Le titre 
est affiché avec un TAG puis avec un 
PRINT, le mode transparent ayant été 
mis, ce qui évite l'effacement du fond. 
Il faut noter que pour des raisons de 
balayage écran on ne voit pas toutes les 
positions de la balle, car si j'avais 
synchronisé l'affichage de la balle sur le 
retour du rayon elle aurait été trop lente. 
Si le cœur vous en dit vous pouvez très 
bien créer vos propres tableaux (lignes 
de DATAS 600...) en changeant les 
datas organisées comme ci-dessous : 
NS,HS,X,Y,NC : 
NS = n° du SPRITE ; 
HS = hauteur du SPRITE ; 
X et Y sont la positions du SPRITE (il faut 
noter que le haut à gauche de l'écran a 
pour coordonnée 0,0 et 1,1 comme avec 
LOCATE) ; 
NC le nombre de coups qu'il faut tirer 
pour détruire le SPRITE (si NC = O alors 
un nombre aléatoire de coups sera choisi 
entre 1 et 4). 
Les SPRITES utilisables dans un tableau 


4: cactus ; 

9 : serpent ; 
10 : arbre mort ; 
11: crane de bovidé ; 
12 : scorpion ; 
22 : petits cailloux compacts ; 
23 : petits cailloux éparpillés ; 
24 : buisson ; 
25 : crane humain ; 
27 : gros caillou. 
Les hauteurs sont toujours de 3 sauf 
pour les SPRITES : 
22 et 23 : hauteur 1 ; 
24 et 25 : hauteur 2. 
Il peut y avoir jusqu'à 31 objets dans 
chaque tableau (qui doit impérativement 
se terminer par -1). 
Vous avez également la possibilité de 
faire varier : 
— Le temps entre 2 coups successifs en 
changeant aux lignes 370 et 380 le : IF 
T1>5oule : IF T2>5 par une valeur dif- 
férente, ce qui permet de donner un han- 
dicap à un joueur plus expérimenté ; 
— Le temps mis pour que les balles 
‘’remontent'’ en remplaçant à la ligne 
430 le : MOD 25 par une valeur diffé- 
rente ex. : MOD 15 ou MOD 30. 
Les touches sont aisément redéfinissa- 
bles en changeant la valeur des 
INKEY(X). 


FREE DE HN DEEE DE DE DEEE EE EE DEEE DE NE 


THE ULTIMATE FIGHT 


BAUDOIN Y. 


ROUX MAXIME 


Æ k OX XX + * 


ÉTILLLLLLLLILSLSLSISSSESSSSS SSI SSS ES SSS SES 
10 DATA 18,14,FE,05, 
ii DATA DD,66,02%, 


CO, DD, 7E,08,03,58 
DD,6E,00,F5,CD,04,52 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
GATA 
DATA 
DATA 
DATA 
DATA 


à DATA 


DATA 
DATA 


: DATA 


JG CN BE à 


uuuununuœnu 


œ 


DATA 
DATA 
DATA 
DATA 
DATA 
BATA 
DATA 
DATA 
DATA 


DATA 


DATA 


y DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
LATA 
DATA 
DATA 
DATA 


2 DATA 
: DATA 


DATA 
DATE 
DATA 
DATA 
DATA 
LATA 


74,44,F1,DD,86,06,D0D,6E,04,90 
C4, CS, 74, A4,FE, CS, C0, Di, 4,70 
FE, 04,DD0,64,02,DD,8E, ee 
LE, 74,44, DS, CD 51,44, 01,05,4 

EE, 4E, 23 ,/6E:0F,47,ER, 13,0%, 
CS,ES, 1ALAE, 77,2%,17,10,07 
F9,E1,01,00,08,09,70,04, 02,20 
01,30,C00,09,C1,0D,20,E8,02,F0 
C9,06,02,5C, 16,00,62,D5,027,7A 
24,5D,29,29,19,29,29,29,01,97 
29,1D1,19,19,FD,11,00,00,02,731 
Hi,19,/C,E8,07,67,3E, CO, 03, 98 
06,84,47,09,E5,17,21,84,05,55 
A4,16,00,5F,19,35E,23,56,02,07 
E1,C2,2B,44,00,90,927,90, 04,26 
26,91,89,91, 4C,92,DF, 92,04, prix 
F2,92,05,93,98, 93,28,604,04, 06 
BE,94,51,95,E4,95,00,64,04,75 
05,85,06,86,09,87, 0C,88, 2,25 
0F,89,12,84,15,8E,18,8C,07,78 
77,96, AÀ,96,DD,96,40,97,04,67 
À3,97,L6,97,00,00, 00, 00, 02,67 
34,00,9F,87,28,2D,24,06,02,2 
9F,F5,67,1A,07,9F, PSE 3,88 
05,CD,74,44,F1,2C,FE,26,04,3E 
CA, AB, A1,22,06,9F, 2A, CA, 03, 1E 
9F,16,00,5F,19,7E,E7,20,02,82 
2B,SA,07,9F,6F, 65, 2E, 05, 02,70 
CD,74,44,3A,01,9F,E7,C8,04,3E 
24,08,9F,67,F5,234,09,9F,03,1F 
BF, 2E,06,CD,74,44,F1,2D,05,C4 
FE,02,28,73,2:2,08,9F,2û,02,9E 
6C,9F,16,00,5F,19,7E,87,02,46E 
20,16,2À,09,9F,6F,83,3E, 02,28 
Gô,C3, 74, A4,22,0€, GFAF, OZ, 6F 
22,00,9F,C00,77,41,18,C3,u07,91 
32,0E,9F,AF, 22,01,9F, 21,02, 81 
OF,9F,ZIAOE,9F,16,00,SF, 02, CA 
19,7E,2D,77,B7,C0,ZA,OE, OS, 08 
9F,17,17,9F,21,2F,9F,19,02,2:4 
7E,57,23,7E, 2F,23,7E,E5,05,5E 
62,68, D5,CD,74,A44,D1,E1,05,36 
23,AF,48,43,56,C23,1F, A3, 03,74 
AF,22,00,9F,3A,02,89F,4F,02,AE 
3À,07,9F,B9,C2,233,A1,3E, 03, 6D 
FF, OS, 9F, CSST, AL. 8F, Gd,1E 
33,01,9F,24,02,9F,4F,24,02,236 
09,9F,B9,CO,3E,FF,232,04,03,94 
A 
18,0E,21,00,80,11,01,80,01, 

Q1,E7, 03, 36, 0G,ED,E0,C9,0% 87 
FE,G4,C0,DD,7E,0é, DD, 4€, 04, 4Ë 
04,DD,46,02,DD,56,00,D5,0%,31 
21,D8,7F,16,00,1E,28,04,01,D8 
19,10,FD,16,00,59,19,D1 ,02,7F 
42,11,2%6, 00, 77,23, 77,22, 01, AD 
77,19,10,F8,09,00,00,00,02, 481 
20,10,00,10, 06,00, 40, 00, 00,80 
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DATA 
DATA 
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DATA 
DATA 
DATA 
DATA 
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DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
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DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


8 DATA 


DATA 
DATA 
DATA 
DATA 
GATA 
DATA 
DATA 
DATA 


DATA © 


DATA 


7 DATA 


DATA 
DATA 


: DATA 
DATA 


DATA 


3 DATA 
: DATA 


DATA 
DATA 


7 CATA 
n DATA 


DATA 


2 DATA 
3 DATA 


DATA 
DATA 
DATA 
CATA 


ee 19, 00,00, 40, 00, 00,50 
70, Fi, 2. CO, ERA 


ï "40, Fz F6, g0 20, 
eu on °F4,20, 10, Ga 
ci u 70, FU, 45, Et, 02,70 
20,90, 80, 98, 73,FE, 40,88, 04,01 
EG, AG,80,68,61,E4,90,88,04,F5 
BOL EG, AZ, 6A, 90,00, A3, 4À, 05,48 
80, 80,AZ,A2,40,10,2%,42,05,58 
F0,B8G, HS, EA,20,E0, 23, EA,04,D8 
90,00, B2, EC, 20, E0, #1, EA, 04,59 
9, O0, B1,FE,20,E0,73,EC,04,AE 
F4,84,D3,FF, FO FO, FT,FE, G7,ZT 
AG,CL,SI,FF,F9,FO,FF,FE, 06, A5 
20,44, 13,FF,FB8,FG,FF,CE, OS, ZE 
80,44,15,FF,F6,FG,FE, CE, OS, GE 
40,66,.27,FF,FB8,FQG,FF,EF,0S, B2 
CO, 27 7,FF, FC, F1,FFSEF, OS, FE 
00,53,27,FF,FC;F9,FF,EF.,05,CC 
80,11,7F,FF,FC,FO,FF,FE, 06,01 
80,11,7F,FF,FS,FC,FF,FE, Gé, O1 
08,33,7F,FF,F3,FE,F7,FC, 05, 9D 
O06,22,7/7F,FF,F7, FF, F7, FD, 05,92 
08,66, 7F,FC,F7,FF,F1,FF,0S,CF 
08,44,/C,CO,FIFE,90,F1,04,FÀ 
19,33, 7/E,10,F7,FF,C0,73,04,235 
19,FF,7F,BOQ,FF,FF,ES,F7,06, 4 
OS,EE, 4F,F9,ZIF,CF,FC,9F,04,E7 
OB,EE,0C,6F,1%,0C,3F, Q9,01,D8 
08,44,00,06,01, 00,02, 00, 00,546 
08,00,18, 
70,80, 00, 00,00, 00,00,10, 01,00 
80, 60, 00,00, 00,00, 00, 20, 01,00 
00,10, 00, 00,00,060, 00, 10, 00,20 
80,60, 00, 00, O0, 00, 00, 00, 00, EC 
00, 00,00, 00,00, 00,00, 00,00, Go 
19,80,00,00,9F 
GF,00,00,60,00,31,C8,01,01,75 
OF,OE,00,Fé6,00,70,E4,01,07,68 
76,86,10,F8,80,70,F3,01,07,E9 
F4,CA,31,F06,60,F0,F2,01,05,43 
FO,C2,31,F6,80,F0,F1,80,05,E4 
F4,C8,72,F0,C0,F1,F1,80,06,40 
F7,C8,72,F2,C0,E0,F4,C8,06,7F 
7:,80,F4,D8,C0,E4,74,C8,05,9F 
30,00,F4,98,C8,E4,74,E4,04,C0 
QF,1C,F8,98,C8,C4,31,C7, 04,23 
OF,0F,F2,00,C8,C4,11,C3,03,70 
GF,9F,E2,00,C8,60,11,97,02,F0 
2C,2F,6À,00,40,00,00,87,01,9C 
BC,4F,48,00,00,00,00,07,01,5û 
78,67,08,00,00,00,00,07,01,0E 
46,87,08,00,00,00,0û,27,01,01 
4F,9F,08, 00,00 300,00, 1/,01,00 
4F,6F, 08, 0€ .00,07,01,0D 
SF,4F,0S, 0,00,07,00,EL 


OF, UF , 08, 00, 00, 00, 00, 07, 00, 2D 


8 


0, 10,00, 00,00, 00,50 


F,08,00,0û0,00, 
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DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


5 DATA 
DATA 


DATA 


S DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
BATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


OF,OF, GC, 00,00,00,00,5F,00,89 
SF,5F,0C,00,00,00,01,05,60,D0 
65,05,06,00,00,00,01,G4,00,1E 
OA, 08, 04,00,00,18,20,10,00,66 
00,00,70,F0,F0,C0,06,00,603,10 
00,10,F3,FF,FF,F8,00,00,03,FS 
00,20,FF,FF,FF,FE,80,00,04,AE 
00,21,9F,EF,EF,7F.80,00,05, AL 
00,71,0F,EF,EF,BF,CG, 00,04, 7D 
G0,73,9F,EF,EF,7F,C8,00, 04,27 
00,7%, 8F,0F,AF,FF,C8,06,04,47 
00,73,FF,FF,FF,FF,C8,06,05,27 
G0,75,FE.FO0,F0,F7,C8,00,05,160 
d0,75,FC,FO,FG, FI, C8, GC 3, GA 
dù,73,FC,F1,F0,F3,C8,0û0,0S,GE 
00,73,F8,F1,F8,F1,08,00,08,00 
O0 73,F6,F1,F8,F1,C08,00,08,0L 
,F8,FF,FF,F1,C06,60,05, 22 
00,72,F0,FF,FF,F1,C8,00,05, 14 
G0,73,F0,F1,F8,F0,C8,00,0S, c4 

va FG,F1,F8,FG,C8,00,08,04 

72,F0,F1,F8,F0,C8,00,05,03 
00,72,F0,F1,F8,F0,C0,00,04,FE 
00,52,F0,F1,F8,F0,64,00,04,9F 
00, 18,F0,F3,FC,F0,646,00,04,6E 
00,34,F0,F0,F0,F0,CZ, 00,04, Ré 
00,30,F0,F0,F0,F0,C3,00,04, BF 
O0,EB,FF,FF,FF,FF, CD, 06,05,64 
G1,38,F0,F0,F0,F0,C1,08,04,C2 
01,20,F0,F0,F0,F0,C6,08,04,E9 
G5,30,F0,F0,F0,F0,C0,0C,04,EF 
G2,00, 00,00, 00,00,00,04,00,06 
03, 0F,0F,0F,O0F, OF, OF, OC, 00,69 
1S,FF,FF,FF,FF,FF,FF,8C,ûé, 99 
O3, 0F,OF,OF,O0F,OF,OF, OC, 66,69 
00, 00,00,00,00,00, 00,00, 00,00 


18,20,10,00,00,00,00,DD,01,25 
88,00, 00,00, 00,00,00,FF,01,87 
88,00,00,060,00,00,44,FF,01,CE 
99,00,00,00,00,00,273,FF,01,CE 
EE, 00,206, 60,00, 00,060,0F,01,1D 
00,00,70,00,98,00,01,0F,01,18 
8C,00,70,00,FA,80,07,0F,02,8C 
8E,G0,70,00,F8,00,0F,1E,O0Z,ES 
87,0F,2C,00,FC,C3,0F, 54,02, EA 
87,0F,78,00,FF,D2,87,78,03,DE 
97,FF,F8,00,77,90,C3,3C,064,94 
AE,00,64,00,00,77,Fi,FC, 03,76 
11,00,00,00,11,88,F8,60,02,02 
00,FF,00,00,22,00,74,C0,02,95 
G0,006,88,00,11,00,72,80,061,4E 
33,EE,88,00,00,88,00,00,02,31 
44,11,00,00,33,00,06,00,00,88 
35,CC,00,00,44,00,00,60,01,43 
00,22,00,06,88,00,00,06, 66, AÀ 
00,11,EE,11,00,00,00,00,01,10 
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DATA 
DATA 
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DATA 
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DATA 
DATA 
DATA 
DATA 
CATA 
DATA 
DATA 
DATA 
DATA 
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DATA 
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DATA 
DATA 
DATA 
DATA 
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DATA 
DATA 
DATA 
DATA 
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DATA 
DATA 
DATA 
DATA 
LATA 
DATA 


2 DATA 
3 DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


? DATA 
: DÂTA 


G0,00,11,00,FF,88,00,00,01,98 
33,00,11,00,00,44,00,G0, CO, 88 
44,FF,EE, 06,11,88,00, 00,02, Cê 
22, 00, 00,00, 22,00, 00,00, 00, 44 
11,00,00,06,11,FF,06,06,01,21 
66,00,00,00,00,00,FF,FF,02,64 
88,00,00,00,00, 00,00, 00,00,88 
0G,00,00,00,00, 00,00, 00,00, 00 
00,00,06, 06,00, 00,00, 060,00, 00 
66,06, 60,00, 00,00, 00,00, G0, 00 
00,00,00, 00,06, 00,00, 00,00, 00 
G0,00,00,00, 00,00, 00, 00,00,00 
00,00,00,18,20,10,00,00,00, 48 
00, 60,00,00,00,00, 00,00, 00, 00 
G0,00,00,00,00,00, 00, 00,00, 00 
00, 00,06, 00,60, 00 : 09,03,00,03 
8,00,00,00,00,006,00,77,00,7F 
8D,08,07,00,00,00,00,74,01,10 
EF, 8C,FF,08,00,00,00,23D,02,8F 
EF,CE,FF,68C,00,00,01,2F,03,58 
FF,3F,FF,8C,00,00,01,23B,03,05 
EF, 1F,FF,CE, 00,00,21,80,0%,7C 
CF,0F,FF,CE,00,00,70,91,03, AC 
8E,8F,FF,CE,00,00,60,D1,04,18 
GE,CF,FF,CE,00,00,60,D1,04,68 
FF,9E,FF,EF,00,00,60, 406,04, 2H 
EF,S3E,FF,EF,00,00,60,40,03,BE 
CF,7E,FF,EF,00,00,60, 40,075, DE 
31,FE,FF,EF,00,00,40,00,03,5D 
32,FF,F7,FF,08,00,00,00,07,23F 
22,FF,F7,FF,08,00,00,00,03,2F 
1i,F7,FE,FF,08,00,00,00, 07, 0ûÀ 
11,FB,FD,FF,8C,00,00,00,07, 94 
GO,FC,F6,FF,8C,00,06,00,07,7 

00,76,F8,F7,CE,00,00,00,03,73 
00,232,A8,00,EF,00,00,00,0G1,C9 
G0,00,D4,00,233,0C,00,00,01,13 
00,00,90,00,00,00,00,0G0,00,90 
00,00,40,80,00, 00,00, 00,00,C0 
60,00,C0,C0,00,00,00,00,01,80 
00,10,90,80,00,00,00,00,01,20 
00,FE,20,00,00,00,06,0û,01,2E 
11,CF,69,00,00,00,00,00,01,49 
O0G,EF,FF,08,00,00,00,00,01,Cé6 
66,35,EB,00,00,00,18,20,01,76 
15,90,00,00,00,00,00,00,0G0,10 
00,00,00,00,00, 00,00, 00,00,00 
00,60,00,00,00,00,00,00,00,0Q0 
00,00,00,00,00,00,00,00,00,00 
00,00,00,01,08,07,00,00,00,10 
00,00,00,27,8C,FF,08,00,01,Cé 
00,00,00,77,CE,FF,8C,00,0%,D0 
00,00,00,77,3F,FF,68C,00,02,41 
00,00,00,EF,1F,FF,CE,00,02,DB 
00,00,00,CF,0F,FF,CE, 00,02, AE 
00,00,00,DF,8F,FF,CE,00,03,3E 
00,00,00,77,CF,FF,CE, 00,03, 13 
00,00,00,FF,9E,FF,EF,00,03,BE 
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DATA 
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DATA 
DATA 
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Res) 
256 
20 7 
258 
289 
260 
bi 
262 
26 
264 
265 
266 
267 
268 
269 
270 
271 
272 
275 
274 
275 
276 
277 
278 
279 
280 
281 
282 
2825 
284 
285 
286 
287 
288 
289 
290 
291 
292 
2923 
294 
295 
296 
297 
298 
299 
300 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
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DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA E 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


00,00,11,EF,3E,FF,EF, 00,03, 2C 
00,00,11,CF,7E,FF,EF,00,07,40C 
00,00,.27,R9,FE,FF,EF, 00,0%, D8 
00,00,27,22,FF,F7,FF, 08,05, 6% 
00,00,77,32,FF,F7,FF,08,03,4Â6 
00,00,66,11,F7,FE,FF,08,03,70 
00,00,66,11,FB,FD,FF,8C,05,FA 
00,01,6E,00,FC,F6,FF,8C,03,EC 
00, 13,AE,00,76,F8,F7,CE,03,F4 
00,77,CE,00,32,A8,00,EF, 03, 0€ 
00,57,CE,00,00,D4,00,73,02,2C 
OÙ, 47,CE,00,00,%0,00,00,01,B1 
00,33, CC, 00, 00, 40, 80, 00, 01, BF 
00,27,0C,00,00,C0,C0,00,01,AÀF 
00,01,08,00,10,90,80,00,01,29 
00,01,08,00,FE,:30,00,00,01,37 
00,01,08,11,CF,69,00,00,01,52 
00,00,08,00,BF,FF,08,00,01,CE 
00,00,04, 00,33, BE, 00,00,00,F3 
00,18,20,10,00,00, 00,00, 00,48 
00, 00,00, 00, 00, 00, 00, 00, 00, 00 
00,00,00,00,00,00,00,00,00,00 
10,00,80,00,00,00,00,00,00,90 
19,80,C0,00,00,00,00,00,01,50 
20,10,00,00,00,77,88,00,01,2F 
72,20, 00,00,00,FF,CC,00,02,5E 
FF,C8,11,688,11,FF,FF,11,04,80 
FF.86,FF,CC,23,FF,FF, BE, 06, SE 
EE,77,FF,CC,77,FF,FF,77,06,1C 
DD,FF,FF,EE,66,33,EE,FF,0é6,4F 
ÊB,FF,FF,EE,CC,O00,EE,FF,06,48û 
77,FF,BB,EE,88,00,55,EE,04,E4 
FF,CC, 11,EE,00,00,Z3,EE,O0S,ER 
FF,00,00,FF,00,00,11,0E,02, 1D 
DD,00,00,77,00,00,01,0F,01,464 
22,00,00,77,00,00,01,4F,00,E9 
EE, 00,00,73,06,00,01,CF,01,F1 
CC, Q0,00,11,00,00,11,CF,01,ED 
Q0 00,00, 00, 00 00,28, 8€, 00,01 
00, 00,00,00,00,00,77,00,00,77 
00,00,00,00,00,11,EE,00,00,FF 
00,00, 00, 00, 00, 28, CC, 00, 00, EF 
00, 00,00, 00,00,07,CC,00,00,CF 
00,00,00,00,00,273,CC,00,00,FF 
00,00,00,00,00,13,88,00,00,9E 
00,00,00,00,00,05,00,00,00,07 
00,00,00,00,00,03,00,00,00,0Z 
00,00,00,00,00,02,00,00,00,02 
G0,00,00, 00,00, 00,00,00,00,00 
00,00,00,00,00,00,00,00,00,00 
00,00,00,00,00,00,00,00,00,00 
00,00,00,00,18,20,10,00,00,48 
00,00,00,00,00,00,00,00,00,00 
G0,00,00,00,00,00,00,00,00,00 
00,00,00,00,00,00,00,00,00,00 
03,08,00,00,00,06,00,00,00,0B 
77,8D,08,07,00,00,00,00,01,13 


301 DATA 74,BF,8C,FF,08,00,00, 00, 02, Cé 


à 3F,FF,3 


2D,BF,CE,FF,B8C, 00, 00,0G1,05, 36 
F,FF, 80,00, 00,0, OZ, 09 
BB,EF,1F,FF,CE, 00,00,01,03,17 
OGCF, OF, FF, CE, 0,00, 00,02, 8E 
11,8HR,8F,FF,CE,00,00,00,02,F8 
11,9B,CF,FF,CE,G0,00,00,075,48 
11,FF,9E,FF,EF, 00,00, 00,03, 9C 
OO,EF,ZE,FF,EF, 00,00, 00, C7, LE 
O0, CF,7E,FF,EF, 00,00, 00,07, 
OO, SI,FE,FF,EF,00,00,00,0%, 1D 
G0,32,FF,F7,FF,08, 00,00,07,2F 
00,32,FF,F7,FF,08,00,00,05,2F 
00,11,F7,FB,FF,08,00,00,02,0À 
00,11, FE,FD, FF, BC, 00,00, 03,94 
00,00,FC,F6,FF,8C,00,00,0%,7D 
00,00, 76, FB,F7,CE, 00, Q0 SOI, IS 
Q0, 00, 32, A8, GO,EF, 00, 00,01,09 
00,00, 00, D4, 00, 33, OC, 00, 04, 13 
60,00, 00,90, 00, 00,00, 00, 00,90 
00,040, 00,40, 80,00, 00, 00,00, C0 
00, 00,00, 20,00, 00,00, 00,01, 80 
00,00, 10,90,80, 00,00, 00, 01,420 
G0,00,FE, 20,00, 00,00,00,01,%E 
00,11,CF,69,00,00,00,00,01,49 


4 00,00,BF,FF,08,00,00,00,01,C6 


00,00,23,8E,00,00,00,16,01,06 

Re US ete ARR ie 
10,00,00,00,00,00,00, 00,230 
00, 01,08,00, 09 
À D uit RE Ad . 
O0, C3, OD, 00,16 


20, 
00,00,00,00,00, 
O6, 00,00, 00,00, 
0F,00,00,00,00, 00,08, 0F, 00,29 
GF,00,00,00,00,01,0F,0F,00,2E 
0F,00,00,00,00,01,0F,0F,00,2%E 
GE,00,00,00,00,05,0F,0F,00,2F 
O0C,00,00,00,00,03,0F,0F,00,£D 
u 
3 


"À OF, 00,00,00,00 03,0F,07,00,28 


0F,08,00,0C,05,01,0F, 0%, 00,28 
07,08,01,0E,07,08,06,00,00,233 
OF,00,01,0E,07,09,0F,00,00,3D 
0E,00,09,0F,0B,0E,0F,08,0G0,52 
07,08,0F,0F,0F,0F,07,06,00,58 
GF,OC,OF,OF,OF,OF,GE,O0F,00,71 
GF,08,0F,0F,O0F,O0F,OD,0F,00,6F 
08,08,07,0F,0F,0F,0D,01,00,62 
07,00,07,0F,0F,0F,O0C,OE, 00,55 
0F,08,03,0D,0F,0F,0D,0F,00,461 
0F,08,07,0E,0B,0F,0E,0F,00,60 
OF,08,0F,0E,01,0F,0E,0F,00,5E 
0F,06,0F,0E,00,02,0F,0F,00,S53 
0F,0F,07,0D,00,07,0F,0F,00,62% 
OF,0F,03,0F,0E,0F,0F,0F,00,6B 
OF,0E,07,0F,0E,0F,0F,0F,00,6E 
0F,0C,07,0F,0F,0F,0F, OF, 00, 6D 
0F,0E,07,0F,0F,0F,0F,0F,00,6F 
0F,0F,035,07,0F,0F,0F,O0F, 00, 64 
0F,0F,00,07,0F,0E,0F,0F,00, 60 
0F,0F,00,03,07,0E,0F,0F,00,54 
0F,06,00,00,03,0C,07,09,00,74 
0E,00,00,00,01,08,03,00,00,14 


66e 
93 


260 
361 
362 
265 
364 
365 
266 
267 
268 
269 
370 
371 
372 


4 


374 
375 
376 
277 
378 
379 
380 
381 
382 
387 
384 
385 
386 
387 
388 
369 
390 
391 
392 
393 
394 
395 
396 
397 
398 
399 
406 
401 
402 
403 
404 
405 
466 
407 
408 
409 
410 
ait 
412 
415 
414 
415 
416 
417 


94 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


GC, 00,00, 00,06, 00,00,00,00,0C 
18,00,00,CC,06,06, 00,00, 00,F0 
11,CC,88,00,00,00,DD,FF,03,41 
60,00,00,00,237,ÈE,00,00,G1,21 
00,00,33,E4,00,00,00,06,61,17 
76,F0,00,00,00,00,76,E0,02,EHC 
G0,00,00,00,10,00,00,06,GûG,Dû 
00,00, 01,80, 0G,00,00,0G0, 00,81 
G3,0C,00,00,00,00,12%,84,00,45 
60, 00,00,00,16,86,ü00,00, 00,90 
00,00, 16, 86,00, 06,06G,00,60, 9€ 
56,D3,00,00,00,00,723,FE, 0%, 9À 
G0,00,00,00,71,F8,00,00,01,67 
60,00,71,E8,00,00,00,00,01,39 
20,C8,00,00,00,00,10,86,01,88 
00,00,00,06,10,80,00,0û,00,90 
06,06, 10,80,00,00,060,00,06,90 
07,87,08,00,00,00,07,0F,06G, A4 
0C,00,00,00,07,07,08,00,00,1E 
G0,00,00,16,0C,00,00,06G,00, 44 
60, 00,00, 00,06, 00,00, 00,06, 00 
00,00,00,00,00,00,00,066,00,00 
G0,00,00,00,00,00,00,00,00,00 
88,00,00,00,00,277,99,060,01,54 
60,06,00,33,EE,00,00,00,01,2 

O0G,FF,C4,00,00,00,00,78,0%,39 
Eù,00,00,00,00,76,C0,00,0%,16 
00,00,00,52,C0û,00, 00,06, 0G,F2 
00,07,08,11,FF,00,00,70,01,8E 
78,F3,CC,00,00,3C,F0,F6,64,59 
G0,00,01,1E,C0,22,00,00,01,01 
21,0F,0C,00,00,06,270,0F,0G0,81 
48,00,00,06,20,F0,F0,80,02,DE 
00,12,90,F0,F0,C0,00,16,07,58 
D6,F0,00,C0,00,07,F0,C0,04,237 
60,C00,00,07,78,80,01,4B,02,07 
08,05,38,80,03,0F,0C,01,00,E2 
10,60,01,08,08,00,18,0C,060,48 
06,00,00,00,01,06,06,00,00,09 
00,01,03,08,00,00,060,060, 00, QC 
OF,08B,00,00,00,00,07,0C,00,2D 
06,00,00,00,72,0C,060,00,00,7E 
00,00,F0,86,00,06,00,00,01,76 
76,86, 00,00,00,06,20,80,01,Â6 
00,06,00,00,10,88,00,00,00,98 
00,00,37,CC,00,00,00,00,00,FF 
32,C4,00,00,09,00,76,E6,02,52 
00,00,00,00,76,E6,00,040,01,SC 
00,00,7C,E6,00,00,00,00,01,862 
F7,EC, 00,00,00,00,F1,E8,03,BC 
00,00,00,00,71,E8,00,06,01,59 
00,00,71,C0,00,06,006,00,00,F1 
10,80,00,006,00,00,10,80,01,20 
00,00,00,06,10,80,00,06,00,90 
06,01,1C,0C,00,00,00,67,00,2 

0F,0E,00,00,00,01,0E,0C,06,28 
66, 18,0C,00,00,06,00,00,00, 24 


00,00,00,00,00,00,00,00,00,0û 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


: DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


2 DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


66,60, 00, 00,06, 00, 00, 00,00, 00 
00,00, 00,00,00,01,00,00,00,01 
G0,00,00,09,0C,00,( ë ë 

00,07,0C,00, 00, 00,00, 72,00, 45 
GF,06,00,00,00,70,E6,0û,01,85 
60,00,00,70,E6,00,00,G0,01,16 
60,30,C4,00,00,FF,88,023,02%,7E 
OC,00,00,33,FC,E1,Eû,00,02,FÈ 
00,00,F6,F0,C3,00,00,00,02%, 49 
44,17,87,08,00,00,00,03,00,E8 
0F,08,00,00,00,33,FF,00,01,49 
06,00,10,F0,F0,80,06,00,02, 7C 
30,F0,F0,90,84,00,20,F0,04, 44 
‘FO, 80, 86,00,230,C0,20,F0,04,76 
OË,01,2D,08,10,E1,0C,03,01,44 
0F,0C, 12,03, 00,01,0D,08,01,12 
01,85,08,00,18,0C,00,00,00,E0 
00,68, 00,00,00,00,01,08,00,11 
06,00,00,006,01,06,00,00,00,09 
00,00,27,08, 00,00, 00, 02,00, 2D 
23,08,00,00,00,06,273,08,0G0,5C 
00,00, 00 8E,23,08,00,00,00,B9 
00,8E,237,08,04,00,00,8E,01,4E 
23,08,04,00,00,8E,23,08,00,E8 
0C,00,00,8E,23, 1D,0C,00,00,Eé6 
00,8F,25,1D,00,00,00,47,01,22 
11,1D,00,00,00,47,11,1D,00,AF 
0C,06,00,47,23,1D,0C,06,00,9F 
00,47,2B,19,00,00,0G,23,00,EÀ 
GF,19,00,00,00,11,8F,û09,0û, DD 
OC, G0,00,00,23,0F,08,00,00,46 
00,00,33,6F,00,00, 00,00, 00, A2 
23,08,00,00,00,00,233,08,00,66 
00,06, 00,00,23,08,00,00,00,2B 
00,00,77,0C,00,00,00,08,00,8E 
04,00,00,F0,00,80,480,F0,07,84 
BO,F0,E0,F0,C06,06,00,û0,04,70 
60,00,08,04,00,00,20,F0,01,2È 
60,10,D0,F0,70,F0,30,F0,04,E0 
00,90,00,00,00,18,ûC,0û, 00, £4 
11,0F,0C,07,00,00,11,0F,00,53E 
0F,07,0E,23,19,3F,CF,17,01,85 
CF,47,0C,8E,23,4F,33,47,0%,9C 
GC,8F,23,4F,00,9F,0E,47,02,01 
GF,47,07,8E,8E,03,0F,47,01,D4 
07,0E,8E,03,CF,4F,03,0C,01,D3 
8E,8E,23,6F,0B,0C,EF, 88,02, DC 
23,2F,08,0D,0F,89B,11,2F,01,44 
OF,0F,0F,DF,00,DD,1F,0F,02,17 
CF,CC,00,00,ÉE,2F,47,64,05,73 
66, 00,00, 0C, 46,62,00,00,00,54 
00,0€C,00,60,00,00,00,CC,01,38 
27,60,00,00,00,22,44,460,01,48 
00,00,02,77,868,70,03,00,01,74 
07,FF,E4,30,1F,80,07,FE,03,HE 
C0,230,1F,EE,07,77,E0,230,03,97 
1F,FC,C2,BB,F8,3C,1F,F0,04,DE 
87,99,10,0F,1F,80,06,00,61,E4 


496 
497 
498 
499 
500 
au 
A0 
JO 
504 
905 
306 
207 
308 
209 
210 
oi 
D12 
915 
214 
215 
216 
917 
918 
219 
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F DATA 


DATA 
DATA 


ï DATA 


DATA 
DATA 


ï DATA 


DATA 


DATA 


DATA 
DATA 
DATA 
DATA 


à DATA 


DATA 
DATA 


3 DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


2 DATA 


DATA 


15,00, 00, 00,86€, 46,80,00, 01,82 
OÙ, OU, SE, 47,8GE, 00, CS, QE, 01,80 
SE, 47,8E,00,47,C0F,8E,47 ‘ 
BE, 46,8SE,47,8E,47,8E,47, ; 
8E,47,8E,47,8F,4F,8E,47,03,50 
8E,47,8F,0F,8E,47,8E,47,05,1L 
ŸF,8F,8E,47,9F,9F,06,47,023,8E 
BE, 47,8F,1IF,06,47,8E,0E, 0, 62 
47,1D,06,47,47,0C,23,BB,01,F2 
46,47,47,CC,00, 72, 47,02, 70 
23, 00,00,77,00,27,00, 00,00, CD 
00,64,00, 11,04, 00,00, 60, 00,09 
00,00,0E,00,73,60,01,00,00,EZ 
OE,O0,F3,E8,00,0B,0E, IQ, UZ, 12 
F3,E8,20,0F,0E,1G,F3,F9,04,14 
71,8F,34,F1,FF,F9,FG,8E,OS,SE 
1E,FOLFF,FF,FO,CE,OE,10,04,E8 
FI,FF,7O,CE, 04,00, F3, CC, GA, FE 
25, 85,00, 16, 00,00, 00,00, G0,EG 
00,00, 00,00, 00,00,00,00,00,00 
G0,00,00,00,00, 00,00, 00,06, 00 
00,00, 00,0E, 00, 00, 00, 00, O0, GE 
11,BF,00,00,00,00,01,4F,01,80 
00,00, 00,00, 10,0E, 00,00, 00, LE 
00,00,12,84,00, 00,00, 00,00, C& 
34,F0,08,00,00,00,35,F3,02,52 
G8,00,02,00,37,F3,08,00,01,2C 
06,00,27,F3,08,00,06,00, 01,TE 
57,F3,08,00,07,00,25,F2,02, 460 
G8,00,12,80,12,E1,00,00,01,8D 
19,C0,12,E1,00,00,06,C0,03,83 
G1,02,00,00,07,0F,0F,C2,01,AÀ 
00,00,78,F0,E1,0F,08,01,0%,461 
CS, OF, 1E,FG,84,00,3C,F0,023,90 
FO,0F,08,11,E1,0F,0F,FG,03,07 
84,00,FE,FO,F0,E7,08,00,04,51 
11,FF,FF,88,00,00,18,0C, 07, BB 
00,00, 00,00, 00,00, 00, 00,00,00 
10,00,00,00,00,00,11,86,00,A1 
G0,00,00,00,00,C8,00,0û,0GG,C8 
00,40,40,C8,40,00,00,64,01,EC 
64,75,80,00,00,72,64,B2,02,A1 
00,C0,00,11,82,272,10,88,02,4D 
00,11,82,22,31,00,10,91,01,07 
B2,B%,44,00,00,F2,11,B2,07,7D 
74,B0,60,FA,51,B2,75,C8,04,BE 
32,64,D9,E4,C8,10,11,E4,04,20 
74,D1,80,20,11.F4,B3,D9,64,76 
80,E%,00,FB,80,FA,D0,CC,05,73 
00,C4,E8,75,EC,00,10,98,023,A5 
26,C0,32,00,00,00,22,80,02, 14 
11,890,00,00,32,80,00,00, 01,43 
00,00,72,80,006,00,00,00,00,B2 
32,86,00,06,00,00,70,E0, 02,02 
00,00,00,10,F5,F6,00,00,01,FB 
00,18,0C,00,00,00,08,00,00,2C 
00,0%,00,10,08,00,04,865,00,83 
00,10,08,00,48,65,80,03,01,48 
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DATA 
DATA 
DATA 
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ÿ DATA 33 


DATA 
DATA 


‘ DATA 
: DATA 


DATA 
DATA 
DATA 


7 DATA 
ÿ DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


7 DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


0C,00,48,12,48,F0,C3,01,07,82 
80,:2,97,F8,F1,9E,80,11,04,61 
F0,F8,F1,F0,00,00,FD,7E,0S, 44 
TE, CB, 00,00, 27,FE, 7F,08,02,EE 


00,00,23,FE,7F, 08,00, 00,01, A8 


ES FE, GS, 00, 0, 11,E4,01,FE 
A5, 00,00, 00,11,F1,E9,00,02, 80 
QU, 00, OU, F8, CS, O0, O0, Or, 1, BA 
QU, FA CS, O0, 00, O0, OG,FE,02,BE 


CE, QC 


Ar MN M JE Pro 
ou OU, 00, 73, 06,00, 


06,58, 00, 00,00, 00, 00,96, 01,01 
BE, 0,00, O0, 18, OC, 00, 00 BE 
O0, 00,00, 00,00, 00,00, 00, 00, 0 


Ü, 


00, 00, 00, 00 00, OU, OU, JO, UU 40 


QU, Q0, Q0, OU, OO, 00, O0, LU, (0 
Q0, 00, 00, 040, 00, 00, 0, QU, O0, Ci 
00, 00,00,00,00,11,C00,00,0û, 01 
00, 00,00,10,F9,00,00,00,01,29 
G0,74,F9,80,00,00,00,E2,02,CF 
72,80,00,00,00,48,70,C0,02,234 
06, 00,01,00,20,CC,00,00,00,FD 
Gi, 00,15, C0,06,0.7,08,0û, 01,04 
40,00,07,70,00,238,F7, 80, 04,00 
09,8F,D0,F1,F0,88,00,2E,0T,FS 
EB,FS,FE,86,0F,0E,78,F4,04,F8 
F2,01,07,089,F2,87,68,0C,02,F0 
G3,BG,E1,0F,00,02,10,F0,02, AS 
61,00,02,00,00,E0,11,0F,01,6F 
OC,00,00,00,00,FF,88,00,01,87 
Où 0, QC GO, O0, O0, 00, 08,00,06 
0C,01,0F,0E,06,00,00,74,00,9E 
FO, CI, 08,00,00,F8,F0,F1,04,94 
OF,0C,00,FB,0F,74,F0,87,03, 16 
00, 74,F0,1F,FO,E1,0C,FS,04,58 
FO,C3,F8,F0,86,F0,F0,E1,06,E2 
7C,FO,C3,F8,F0,F0,F8,F0,06,EF 
E2,00,08,0C,00,0F,08,00,01,0D 
09,00,74,F0,87,00,65,00,02,50 
FO,F0,F0,0C,32,08,FC,F0,05,02 
FG,00,00,00,235,FF,EE,09,07%,10 
47,00,07,08,00,11,F0,0C,01,6Z 
FO,86,23,74,F0,C3,F8,C4,05,7C 
E9,33,F0,C0,00, 10,0C,00,02,E8 
06,00,00,00,00,00,00,21,00,21 
08,06,00,06,00,DE,0C,00,0G,FZ 
00,00,06,EB,86,00,06,10,01,81 
OE,75,0F,10,08,23,97,67,01,CE 
7,23,0C,75,4B,9F,0E,57,0%,74 
OE, 76, AD, 2D, A6, EB, 86, 33,03, 48 
4B,0F,7D,D6,2E,00,D6,4E,02,FC 
1E,4B,CC,22,AF,AD,87,1F,02,69 
00,75,D7,5F,1E,SA,0C,76,02, 45 
EB,BE,A7,4F,86,75,F5,D7,05,C4 
7F,F5,4C,253,FA,99,19,FA,04,99 


60 
95 


à DATA CC,Gû,FF,232,84,77,06,00,0%,F8 
5 DATA 10,00, 00,00, 05, 0C,00,G0,00,2E 
DATA 00,00,F0,03,00,00,00,730,01,E7Z 
DATA FO,F0,00,00,00,377,FC,B7,05,D6 
DATA CE, 00,00,27,FE,7F,CE,00,05,50 
DATA 00,83,FE,7F,CA,00,00,61,02,FE 
DATA FC,E7,C2,00,00,10,F0,F0,04,65 
DATA 80,00,00,20,87,FC,04,00,02,87 
0 DATA 03,20,D3,F8,04,00,:4,28,02,4E 
DATA FO,F0,04,00,70,18,237,EC,03,8F 
22 DATA G66,06,20,96,83,DC,87,69,03,53 
3.3 DATA 11,F1,F0,F0,70,E2,272,E6,05,4C 
DATA FC,EZ2,FF,F9,11,88,33,CC,0S,6E 
3 DATA 00,66,00,08,08,00,0E,03,00,87 
DATA 0C,0%,03,34,87,F0,E9,79,03,DF 
DATA Ei,F5,FE,F3,FA,BE,99,0D,06,F2 
DATA DD,11,99,88,DD,11,00,88,03,85 
DATA 88,11,00,00,88,00,18,0C,01,45 
DATA 00,01,0E,00,00,00,00,8F,00,9E 
DATA 0F,08,00,00,11,0F,0F, 00,00, 
? DATA OE,00,11,0F,0F,1F,0F,00,00,6E 
% DATA 25,8F,0F,1F,0F,08,2%,4F,01,69 
DATA OF,1F,0F,08,27,AF,0F,0F,01,25 
j DATA 8F,0C,57,5F,4F,0F,8F,0C, UE, 4A 
DATA 47,AF,1F,FF,8F,00,57,4F,05,55 
DATA EF,OF,6F,0C,67,EBF,0F, UF, 02, AD 
DATA 1F,OE,BF,4F,0F,OF,OF,8E,01,Fé 
DATA AF,8F,0F,OF,OF,4E,9F,O0F, 02,67 
DATA OF,OF,OF,4E, OF, OF,OF, OF, 01,47 
DATA OF,SE,AF, OF, OF, OF, OF, 2E, 01,56 
DATA 57,0F,0F, OF, OF,OE,AF,OF,01,5F 
DATA OF,OF,OF,OE, OF, OF, OF, OF, 01,07 
CATA GF,OE, 6F, AF,CF,OF,OF,0F,01,77 
25 DATA 5F,5F,5F,5F,0F,OF,6F,AF, US, EE 
DATA AF,AF,AF,EF,9F,FF,6F,1F,05,48 
DATA SF,UE,67,1F,/F,CF,OF,&6E, 0, BE 
£8 DATA 00,00,00,00,00, 00,00, 06,00, 00 
9 MEMORY &7FFF 
30 MODE Z:FRINT" 
! SVF Me FRINT 
631 CHÉ=O:LI=10:ADD=8A400: FOR I=&A400 TO 
RAdIEF STEF 8:FOR Z=1 TO 8:READ X#:FOKE 
ADD, VAL C"R&U+X8) : ADD=ADD+1 : CHE=CHE+VAL CR 
M+XE):INEXTIREAD A$,B$:IF CHE CVAL CUBA 
$+E$)) THEN FRINT'ERREUR DANS LES DATAS 
LIGNE: "3;LI:END 
832 CHE=Q:LISLI+I:NEXT 
BE CHÉ=O:ADD=SAÏIDO: FOR I1=%A100 TO ZAID7 
STEF 8:FOR 2Z=1 TO B:READ X$:FOKE ADD, VA 
L("LU4XS) s ADD=ADD+1: CHÉ=CHE+VAL (ME X SE) : 
NEXT:READ AS,ERS:1F CHE <> (VAL (ML U+AS+ES) ) 
THEN FRINT'ERREUR DANS LES DATAS LIGNE 
:"sLI:END 
&%4 CHÉ=O:LISLI+1:NEXT 
85 CHE=0: ADD=%A300: FOR 1=8A300 TO LAZIF 
STEF 8:F0R Z=i TO 8:READ X#:F0FHE ADD, VA 
Liat+xs) s ADD=ADD+ 1: CHEZCHE+VAL CRUE XS D : 
NEXT:READ A$,B#$:1F CHEH<£ + (VAL (ME U4+AE+ES) ) 
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THEN FRINT'ERREUR DANS LES DATAS LIGNE 
:"sLI:END 

836 CHEzO:LISLI+IINEAT 

827 CHKk=O:ADD=#8400: FOR I=88400 TO 2&8DIF 
STEF 8:FOR 2=1 TO 8:READ X$:FOKE ADD, VA 
L(UBMEXS) : ADD=ADD+ 1: CHE=CHE+VAL CEUX SE) à 

NEXT:READ AS,B#:1F CHE£ > (VAL ("&"+AR+ES ) ) 
THEN FRINT'ERREUR DANS LES DATAS LIGNE 
:"sLI:END 

658 CHk=o:LIELI+I:NEXT 

6329 CHH=O:ADD=%#9000:FOR 1=8%9000 TO &985F 
STEF 8:FOR Z=i TO 8:READ X$:FOKE ADD, VA 

L("RU+XS) : ADD=ADD+ 1: CHK=CHE+VAL CRU XS) à 
NEXT:READ A$,EB$:IF CHKi: (VAL ("R"+A$+R#) ) 
THEN FRINT'ERREUR DANS LES DATAS LIGNE 
1"'sLI:END 

640 CHE=OQ:LI=LI+1: NEXT 

641 FRINT'INGEREZ LA CASSETTE OÙ LA DISC 

ÉETTE VIERGE":CALL 8&BH18:CALL &EBR18 

&42 SFEED WRITE Ï 

64% SAVE"ULTIMATI",B,84100,%27C0 

644 SAVE'"ULTIMATE",E,89000,8860 

845 SAVE"ULTIMATZ",8,88400,8920 

éd4é FRINT'SAUVEGARDE TERMINEE"@ 


INR ZT TT TL ILIISIISLSLISSSSSLSLSSÉSS SE LESSLSES) 


EQ ‘+ * 
EQ ‘+ # 
AG ‘% FROGRAMMATION : BAUDOIN ÿ. # 
50 ‘+ de 
&0 ‘+ GRAFHISMES : ROUX Maxime * 
70 ‘# * 


80 MTL T ITS T SIT SITILIILLILILILILSISLLLL SL SSESESS ESS) 
90 IF HIMEM:&7FFF THEN MEMORY &7FFF :LOAD 
“ULTIMAT1":LOAD'ULTIMATZ":LOAD'ULTIMATE" 
: CLOSEIN 

100 ON BREAK GOSUB 1540:MODE 1:INK O,3:1 
NE 1,152:INE 2,21:INE 3,0:BORDER 3:G070 1 
180 

Lo 

170 ‘PROGRAMME PRINCIFAL 

130 

140 DEFINT A-Z:DEFREAL T 

150 SC1=0:SC?2=0: A=1: MODE 1:CALL SBB4E:RE 
STORE 600: Bi=6:EH2=6: VI1=10:VI2=10 


160 
170 ‘AFFICHAGE DU TABLEAU 
180 ‘ 


190 SCREEN=#8000:CALL &A302 
200 READ Z:1F Z£>-1 THEN READ H,X,Y,W:CA 
LL &A400,2,X,Y:CALL BA3OO,À,X,Y,HiPOHE ( 
BOF2F+A%4) ,X:FOKE (W9F20+A%4) , Y:POKE (89 
FZi+axd),2:POKE (kOF22+A#4) ,HiA=A+I ELS 
E 230 

210 FOKE 29FOF+A-1,W:1F W=0 THEN POFE 89 
FOF+A-1, INT (RND#4)+1:G0T0 200 

220 GOTO 200 


Per 
PRE] 


240 ‘EOUCLE FRINCIFALE 

250 

VIES :10 BALLES :6 

Ms CHRS(LEZ) 5" VIES :10 BALLES :6 “:LOCAT 

E 7,1:PRINT USING"##":;VII5::LOCATE 28,1:F 

RINT USING'"##";VI2 

270 CALL 84400,0,0, 1: X=0: Y=1:CALL &A490, 

Ps Site No ST: Vers] 

280 IF INKEY(67)£;-1 AND Y£:1 AND FLi=0 

THEN CALL 8A402,0,X,Y-1,X,Y:Y=Y-1 

290 IF INEEY(Z)£:-1 AND Y2€>1 AND FL2=0 

THEN CALL 84402,2,X2,Y2-1,X2,Y2:Y2=Y2-1 

EG IF INKEY(71)<5>-1 AND Y£:22 AND FLi=0 
THEN CALL 8A407,0,X,Y+1,X,Y:Y=Y+1 

310 IF INEEY(S)£:-1 AND Y22>27 AND FL2=0 
THEN CALL 84402,2,X2,Y2+1,X2,Y2:Y2=Y2+1 

320 IF INEEY(60)2;-1 AND FLi=0 THEN CALL 
LA400,0,X,Y:CALL 84400,1,X,Y:FLi=1 

330 IF INKEY (12 )£>-1 AND FL2=0 THEN CALL 
UA400,2,X2,Y2:CALL %A400,3,X2,Y2:FL2=1 

340 IF INEEY(60)=-1 AND FLi=i THEN CALL 

LAA4GO,1,X, Y:CALL #4400,0,X,Y:FL1=0 

350 IF INKHEY(1Z)=-1 AND FL3=i THEN CALL 

LA4O0,3,X2,Y2: CALL 84400,2,X2,Y2:FL2=0 

360 TFL=Q 

370 IF INKEY(69)<5:-1 AND FLi=i THEN IF T 
125 AND B1:0 THEN FOFE #9F06,2:FOKE %9FO 

7,Y+1:CALL #A400,5,2,Y+1:POKE 89F00, 1: AD 

D=(Y+1)#40:POKE &9FO0û, (ADD-256# INT (ADD\2 

56)):POKE &9FOB, &B0+ADD\2546: T1=0:Bi=B1-1 
:LOCATE 18,1:PRINT CHR$(&30+B1); 

380 IF INEEY(4)£:-1 AND FL23=1 THEN IF TZ 
:5 AND EZ:0 THEN FOFE &9F08,37:FOKE 49F0 

9,Y2+1:CALL &A400,6,237,Y2+1:POKE #9F01, 1 
: ADD=(Y2+1)#40:POKE 89FOC, (ADD-256%INT (A 

DD\256)):POFE &9FOD, #80+ADD\256: T£=0: BT= 

B2-1:LOCATE 39,1:PRINT CHRS$ (%30+8B2) : 

290 IF FEEK(&9F00)=1 OR FEEK(&9FO1)=1 TH 

EN CALL &AOOO: TFL=1:GOTO 390 

400 IF TFL=O THEN POKE #9F06,10:FOKE &9F 
07,10:FOKE 8&9F08,10:POKE &9F09,10 

410 IF TFL=i THEN IF FEEK(&9F06)=37 THEN 
IF FEEK(&9F07)=Y2 OR FEEK(&9F07)=Y2+1 0 

R FEEE(89F07)=Y2+2 THEN PRINT CHR$(7)3: 

ME=1 

420 IF TFL=1i THEN IF PFEEK(29F08)=3 THEN 
IF FEEK(#9F09)=Y OR FEEKH(29F09)=Y+1 OR F 

EEK (&9F09)=Y+2 THEN PRINT CHR$(7);:Mi=1 
420 IF M1+M2=0 THEN Ti=Ti+i: T?2=T2+1: TP=( 

TF+1)MO0D 25:1F TF=i THEN EHi=(Bi+1):B7=(E 
2+1):ELSE GOTO ?80 ELSE G60T0 500 

440 IF Bi=7 THEN Bi=46 

450 IF B£=7 THEN E?=6 

460 LOCATE 29,1:PRINT CHR$ (230+B2) ; : LOCA 
TE 18,1:PRINT CHR$(&30+B1)::GOT0 280 

470 

480 ‘MORT D'UN DES JOUEURS 


490 
900 IF Mi=i THEN CALL 8&A400,C4FLI,X,Y:CA 
LL SBB4E:CALL %4400,7,4,% 
910 IF M2=1 THEN CALL &EBB4E:CALL #A400,2Z 
+FL2,X2,Y2:CALL REBA4E:CALL %4400,8,X2,v2 
320 FOR Z27=1 TO 1O000:NEXT:VIi=VII-Mi:VIZ 
=VIZ-ME:CALL SATOZ: A=1:MI1=0: MI=Q: Bizs: EE 
=éiv=is: Ya=l:SC1=0:SC2=G: CLS: FLi=G:FLE=0 
330 IF VII+VIZS=0 THEN LOCATE 5,12:FRIHT" 
VOUS VOUS ETES MUTUELLEMENT MASSACRES !" 
:GOTO 855 
340 IF VII=0 THEN LOCATE 1,3:FRINT"  Jou 
eur l'iFRINT:FRINT" Vous n etes plus de 
ce monde cruel": PRINT:FRINT" et impito 
ÿable.":PRINT:FRINT" vous auriez du vou 
5 mefier,ies trous":FRINT:FRINT" sont m 
auvais pour la sante.":6G010 856 
230 IF VIZ=0 THEN LOCATE 1,3:FRINT"  JOU 
EUR 2":PRINT:FRINT" Vous nous avez quit 
te":FRINT:FRINT" Que le Z-B0 aie votre 
ame": PRINT:FRINT" Ii ne faut pas se deg 
uiser en passoire":PRINT" cela peu prov 
oquer des desagrements":G0OTO 856 
960 GOTO 200 
570 
980 ‘TABLEAUX 
290 ‘ 
600 DATA 4,3,5,1,0,25,2,16,1,0,12,3,27,1 
:9,4,3,24,5,0,12,7,5,6,0, 9,3,15,7, 0,4,2, 
8, 14, 0,25,2,17,15,0, 12,3,27,19,0,9,3,9,2 
1,0,4,3,19,22,0,11,3,26,11,0,22,1,33,17, 
254, 1 
610 DATA 4,3,5,2,0,22,1,16,2,254,12,3,1i 
.#0252,28,4,0,25,1,10,7,0,25,1,13,7,0 
54,3,24,8,0,10,3,34,7,0,4,3,29,11,0,27,3 
,13, 10,0 .9,3,8, 12,0,12,5,32,15.,0 ,10, 3, 22 
,18,0,27,3,26,20,0,11,3,12,20, 0,24,2,5,2 
1,0,23,134, 24,0, 21 
+ DATA 24,2,21,1,0,4,3,11,3,0,24,2,76, 
4,9,22,1,97,294, 12,3, 14, 3,0,11,3,20,9,0 
,25,2,32,9, 0,10,3,9, 12,0,27,327, 13,0,9, 
3,16,15,0, 103,25, 19,0, 25, 2,9, 22,0, = 
30 DATA 4,3,6,1,0,25,2,20,2,0,4,3,34,1, 
0,10,53,15,5,0,4,3,25,6,0,12,3,5,7,0,24,2 
117:10,0,10,3,27,10,0,24,2,31,12,0,10,3, 
9, 13,0,25,2,15, 15, 0,4,3,3,16,0,10,3,25,1 
9,0,4,3,32,20,0,-1 
640 DATA 25,2,3,2,0, 12,5,28,1,0,24,2,20, 
3:10,12,3,10,6,0,9,3,13,7,0,11,3,32,6,0,2 
D12119,9,0,11,5,5,12,0, 9,3,24,14, G,25,2, 
34,15,0,25,2,12,17,0,9,3,7,20,0,24,2,17, 
21,0,11,3,22,22,0,12,:,28,22,0,-1 
450 DATA 24,2,12,1,0,25,2,24,4,0,4,3,4,5 
50522120, 7,254,22,1,8,10,254,10,3,31,9 
50,253,215,12,0,12,3,10,15,0,24,2,25,15, 
0,4,3,6,19,0,24,2,20,19,0,4,3,31,18,0,10 
,3,13,21,0,-1 
660 DATA 4,3,12,3,0,22,1,232,2,254,24,2,2 
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D 20075000 00 0slloilés 60,4, 3,24,8,4,1 
0,3,20,9,0,25,1,11,11,294,25,2%,17,12,6,2 
2,1,2%,16,254,9,3,10,17,0,27,3,17,19,0,1 
2,320: 20: 0,24,2,7,28, 04%] 

870 DATA 22,1,8,2,294,25,2,27,3,0,24,2%,1 
4,4,0,25,2,0,6,0,27,%115 730522513199 
54,12,5,27,8,0,4,3,5,13,0,9,3,25,15,0,22 
,1,23,18,254,12,3,10,19,0,25,2,25,22,0,1 
1,3,19,13,0,-1 
680 DATA 23%,1,11,2,254,4,3,4,3,0,24,2,16 
,n04,%,%6,4,0,10,7,8,6,0,4,3,13,9,0,27 

.1,20,9,:54, 11,2,17, 11,0,24,%,47,12,0, 24 
s2614,0,10,3,20, 14, G,22,1,13,15,254,4, 
2,10,19,0,4,8,22, 18,0,24, 2,20, 20,0, 22,1, 
3,223,404,—1 
890 DATA 22,1,22,1,254,22,1,4,2,254,235,1 
,27,2,0,27,3,11,4,0,23,1,19,5,0,23,1,20, 
6,0,23,1,12,7,0,23,1,6,10,0,28,1,9,11,25 
4,11,3,17,10, 0,22,1,22,11,294,22,1,23, 12 

.254,57,3,230,10,0,27,3,9,12,0,27,3,17,17 

10,28,1 ,27,17,0,27,3,32,17,0,22,1,9, 19,2 
24 
700 DATA 25,1,16,20,0,23,1,17,21,0,22,1, 
J,2 125428, 2 12 Peas 19,24,0,22,1, 
28,24,4254,-1 
715 DATA 24,2%,31,1,0,22,1,35,4,254,24,2, 
11,4,0,22,1,20,6,254,10,3,12,8,0,24,2,26 

,8,0,24,2,23,10,0,22,1,9,13,254,22,1,23, 
17 0,24,%,23,17, 0,24,2,15,19, 0,24,2,31,16 

,0,24,2,21,22,0,22,1,10,24,254,-1 
720 DATA 4,3,9,1,0,24,2,14,1,0,10,23,25,1 
.0,10,8,26,1,0:10,2,16,90,4,3,31,5,0, 24 
.2:19,6,0,4,3,33,6,0,24,2,19,7,0,24,2,12 

,8,0,24,2,15,8,0,4,3,3,12,0,10,3,8,1%,0, 
10,3, 20, 15,0,24,2,26,12,0,24,%,27,14,0,4 
531604, 717,0,24,2,11,17,0 242,1 
8,18,0, 4,3, 

730 DATA 16,0,24,2,22,21,0,10,2,7,22,0,4 
5219,22,0,10,3,28,22,0,-1 

740 DATA 10,35,16,2,0,22%,1,10,4,254,24,%, 
33,5,0,27,3,24,5,0,10,3,6,8,0,9,3,15,9,0 

,22,1,29,13,254,24,2%,9,17,0,27,3,18,17,0 
572,22,22,0,10,3,29,22,0,24,2,10,25,0,- 
1 
750 DATA 55,2,22,1,0,4,3,18,2,0,4,3,28,4 
:04,23,8,50,12,%413,9,0,4,2,17,10,0,22, 
1,8,12,254,22,1,28,15,254,4,5,4, 16,0, 25, 
2,14,17,0,4,3,27,18,0,12,3,10,22,0,1%,3, 
29,22,0,-1 
760 DATA 11,3,5,1,0,24,2,23,2,0,25,2,15, 
4,0,24,2,9,9503 11,3, 27, d0:4%20,97,0,11 
525 751150940329 145092932521514,0 ,4,3,1 
4,17,0, 11,3,23,19, 0,11,3,8,20, 0,23, 1, 16, 
74, 023,1, 19,24,0, -1 
770 DATA 10,35,21, 1,0 ),24,2,34,5,0,25,2,8, 
4,0,10,3,15,7,0,4,3,26,68,0,24,2,3,11,0,1 
0,3,31,12,0,12,2,17,12,0,11,3,25,15,0,4, 
3,11,16,0,9,3,3%,18,0,10,3,7,19,0,24,2,1 
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3,20,0,29,2,209 22081 

2e DATA 2%,1,19,2,254,4,3,26,4,0,4,3,6, 
d0275210,6,0,10,3,19,10,0,22,2,32,10, 
254,23,2,34,14,0,24,2,3,14,6,27,3,15,1 

Q0,10,3,323,17,0,22,1,4,21,254,27%,1,5,22,2 

54,22,1,, 24,294, 22, 1,25,27, 254, = 

790 DATA 25,2,22,1,0,11,3,18,2,0,4,3,36, 

4,0,4,5,8,5,0,12,3,13,5,0,4,3,17,10,0,2% 
,1,8,12,2 54,22,1,28, 15,254,24,2,4,16,0,2 
5,2,14, 17,0,11,3,23,18,0,12,3,10,22,0,9, 

3129,22,0,-1 

800 DATA 22,1,6,2,254,27,:3,9,2,0,22,1,12 
124204327556 2 027934229290 2OE 
,0,22,1,29,2,254,22,1,19,4,254,22,1,29,4 
,294,27,3,9,5,0,27,3,16,5,0,27,3,22,5,0, 
27,3,26,9,0,22,1,29,7,294,27,3,7,13,0,27 
,414,15,0,22,1,10,17,254,27,5,21,13,0,% 

7,3,23,13,0 

810 DATA 22%,1,28,17,254,22,1,17,14,254,% 

2,1.20,14,254,2%,1,18,15,254,27,3,7,16,0 
s28110,16,254,27,3,14,16,0,27,3,21,16, 

0,27,3,23,16,0,27,3,241,19,0,22,1,10,18,2 
Die ou 18,254,-1 

8E0 

830 ANIMATION DE FIN DE FARTIE 

840 : 

950 LOCATE 10,15:FRINT'"'Les Vautours Sont 
Gates":LOCATE 4,17:FRINT"II Vont âvoir 
À Manger Aujourd'Hui":FOR Z2=1 TO 40:A#=I 

NÉEYS:NEXT:CALL &BB1i8 

860 MODE 1:CALL %4400,4,1,13:CALL &A400, 
10,29,13%:CALL 84400,21,26,1 

870. FOR I=û TO 19 STEF 2:CALL &A400G,26,1 
S16:NEXT: FOR I=24 TO 29 STEF Z:CALL &A4ù 
0,26,1,16:NEXT 
880 CALL &A400,21,4,3:CALL %A4400,21,10,4 
:CALL &A400,21,18,% 

890 CALL %A400,16,20,15:CALL 8A400,21,.34 
59: CALL &A400,20,74,1:FOR 2Z=i TD 100CO:N 
EXT 

960 CALL %A400,20,274,1 

910 X=34:Y=i:CALL 84400,19,X,Y 

920 FOR I=i TO 12 

30 CALL &EBDI9:X=X-1:Y=Y+1: CALL 84402,19 
sX5YsX+ti,Y-1: FOR Z22=1 TO 99: NEXT:NEXT 
940 CALL %A400,19,X,Y:CALL 8A400,20,2%1,1 
2:FO0R I=i TO 3 

950 CALL #BDI9:FOR Z2=1i TO 1Z2:NEXT:CALL & 
A400,20,21,12:CALL 8&A400,18,21,12:FOR 22 
=1 TO 1200:NEXT 

960 CALL %BDI9:FOR Z=1 TO 1Z:NEXT:CALL à 
A400,18,21,12:CALL %A400,20,21,12:FO0R 22 
=1 TO SOG:NEXT 22,1 
970 CALL %A400,20,21,12:X=21:Y=12: CALL # 
A4GO,17,21,12:FO0R W=i TO 2 
980 FOR I=i TO 2:CALL &BDI9:FOR Z=i TO 1 
ZINEXT: X=X-Z: V=Y-1:CALL RA40S,17,X,Y, X+2 
,sŸ+1:FOR Z2=i1 TO 1SO:NEXT:NEXT 
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990 FOR I=1 TO 2:CALL &BD19:FOR Z=1 TO 1 

ZiNEXT: X=X-2: Y=Y+1:CALL 2A402,17,X,%,X+7 

,Ÿ-1:FOR ZZ=1 TO 150:NEXT:NEXT 

1000 NEXT 

1010 FOR ZZ=1 TO 1500:NEXT 

1020 MODE 1 

1030 FOR 1=0 TO 34 STEF 2:CALL #&A400, 26, 

1,17:NEXT:FOR I=0 TO 39 STEF 2:CALL &A40 

0,26,1,23:NEXT:CALL &A400,21,1,1:CALL &A 

400,21,7,2:CALL #A400,21,12,0:CALL 24400 

,4,11,12:CALL 8A400,4,13,10:CALL #4400, 4 

,15,8 

1040 CALL #4400,4,26,12:CALL &A400, 4,24, 

10:CALL 2A400,4,22,8:CALL %A400,21,25, 1: 

CALL LA4OO, 21 , 29, O:CALL 8A400,21,25,2:F0 

R 1=0 TO 39 STEF 2:CALL #A400,26,1,24:NE 

XT:CALL %A400,24,4,15:CALL %A400, 75,22, 1 

S:CALL 8A400,25,15,15 

1050 CALL &A400,15,18,13:CALL 2A400,12,7 

9,13 

1060 DEFINT T:ENV 1,7,2,1:RESTORE 1060:F 

OR I=1 TO 11:READ À, B: SOUND MES, 

O, 1: SOUND 7,0,3,0:NEXT:DATA 20,4,20,2,7 

120,4,17,3.16,1:18,2,20,1,20.5,21, 1°20 
4 

L 

1070 CALL &A400,14,18,13:X=18:Y=17 

1080 FOR I=1 TO 12:CALL %BD19:FOR Z=1 TO 
TaNEXT: Y=Y-L: CALL &A4O2, 14, 4,1, X, Y+1: FO 

R ZZ=1 TO 150:NEXT:NEXT 

1090 X=29:Y=13:FOR I=i TO 7:CALL S&BD19:F 

OR Z=1 TO 11:NEXT:X=X+1: CALL %A402,13,X, 

Y,X-1,Y:FOR ZZ=1 TO 99:NEXT:NEXT 

1100 FOR I=1 TO 6:CALL %BD19:FOR ZZ=1 TO 
12:NEXT: Y=Y+1: CALL 8A4O2,12,X,Y,X,Y-11F 

OR ZZ=i TO 99:NEXT:NEXT 

1110 FOR I=1 TO 25:CALL SBDI9:FOR ZZ=1 T 

D 14:NEXT:X=X-1:CALL 9A402,13,X,Y, X+1, Vs 

FOR Z=1 TO 99:NEXT:NEXT 

1120 CALL &EB18 

1130 

1140 ‘MENU 

1150 

1160 MODE 1:CALL 2BB4E:CLS:PRINT CHR$ (27 

)CHR$(1):FLOT 1000,1000,3: TAG: MOVE 156,2 

80:PRINT'THE ULTIMATE FIGHT"; : TAGOFF : FEN 
1:LOCATE 11,2:PRINT'THE ULTIMATE FIGHT" 

52 PRINT CHR$ (22) CHR$ (0): LOCATE 9,6: PRINT 

"OPTIONS :" 

1170 CALL 8A400,0,4,20:CALL &A400,2,32,2 

O:CALL 2A400,11,18,19:CALL &A400,22,19,2 
2:CALL %A400,21,0,3:CALL %A400,21,31,3:C 

ALL 24400, 20, 18,2 

1180 LOCATE 8,8:PRINT"1) MONITEUR COULEU 

R" 

1190 LOCATE 8,10:FRINT"2) MONITEUR MONOC 

HROME “ 

1200 LOCATE 8,12:PRINT"3) INSTRUCTIONS" 

1210 LOCATE 8,14:FRINT"4) JOUER" 


1220 LOCATE 8,16:CALL 2BB81:CALL SEB7E 
1220 AS="UIWHILE A$="":AS=INEEYS: WEND 
1240 IF À$S:"O" AND A$:"5" THEN A=VAL(A#) 
ELSE 1270 

1256 ON À GOTO 1260,1570,1280, 140 

1260 INE O,Z:INE 1,1S2INE 2,21:INE Z,0:E 
ORDER Z:G0OTO 1220 

1270 INE O,B:INE 1,18:INE 2,26:INE 3,0:E 
ORDER 8:GO0OT0 1720 

1280 CLS:LOCATE 14,4: FRINTTOUCHES "à LOCA 
TE 16,5: PRINT" 

1290 LOCATE 3,7:FRINT'JOUEUR 1 

JOUEUR 2" 
1:00 LOCATE 3,8: PISE" Srrenss— 
1310 LOCATE 8,9:FRINT"Q 
9" 
1320 LOCATE 8,10:FRINT"! 
1350 LOCATE 8,11:FRINT"! 


1:46 LOCATE 8,12:FRINT":! 
1250 LOCATE 8,14:FRINT" S---f 
GS 
1160 LOCATE 8,16:FRINT"! 
1:70 LOCATE 8,17:FRINT"! 
1:80 LOCATE 8,18:FRINT": 
1390 LOCATE SN ÉPSER NET 
1400 CALL LEB18: CLS 
1419 PRINT:FRINT'LE EUT DU JEU EST DE TU 
ER VOTRE ENNEMI 
1420 FRINT:FRINT'EN LUI TIRANT 10 BALLES 
DESSUS 
1470 FEN Z:FRINT:FRINT'FOUR TIRER IL FAU 
T S'ACCROUPFIR FUIS 
1440 FRINT:FRINT'PUIS AFPUYER SUR LA TOU 
CHE DE TIR" 
1450 PEN 1:FRINT:PRINT'LES OBSTACLES DIS 
FARAISSENT AFRES AVOIR 
1460 FRINT:PRINT'ETE TOUCHES UN NOMBRE A 
LEATOIRE DE FOIS 
1470 PRINT: PRINT" (SAUF FOUR LES FIERRES 
PLATES QUI SONT 
1480 FRINT:FRINT'INDESTRUCTIBLES ) 
1490 PEN Z:PRINT:PRINT"'IL FAUT UN CERTAI 
N TEMPS ENTRE DEUX TIRS 
1500 FRINT"'POUR REARMER VOTRE FISTOLET 
1510 PRINT:FRINT'NE GASFILLEZ FAS INUTIL 
EMENT VOS BALLES 
1520 FRINT:PRINT"'CAR LES SIX-COUFS SONT 
LENTS À RECHARGER"; 
1530 CALL £BE18:G0T0 1160 
1540 RUNQ@ 
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(SUITE) 


Maintenant que nous savons de quoi 
nous parlons, regardons de plus près le 
fonctionnement de ces types de langa- 
ges. 


LANGAGE INTERPRETE 


En mémoire vive, nous avons : 

e le système d'exploitation, 

e le langage d'application, 

e le texte écrit, appelé le source. 
L'ordinateur va se réserver une petite 
place en mémoire vive et, à l'aide du tra- 
ducteur, il va convertir en binaire la pre- 
mière ligne d'instruction. 

Deux cas peuvent se produire : 

e L'ordinateur détecte une erreur de 
syntaxe, 

- il détermine le code de l'erreur, 

- il affiche ce code ainsi qu’un message, 
- ilinterrompt sa traduction et repasse la 
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main à l'éditeur de texte. 

e L'ordinateur ne détecte aucune erreur 
de syntaxe, 

- il exécute les ordres binaires traduits et 
s'il ne trouve aucune erreur de syntaxe 
dans cette exécution, il repasse la main 
au traducteur pour traduire la ligne sui- 
vante et ainsi de suite. 


Les avantages de ce type de traducteur 
sont évidents : 

° La détection des erreurs est immédiate 
et la correction de celles-ci peut aussi- 
tôt se faire. Il s’agit donc d'un langage 
très interactif, on suit facilement le 
déroulement du programme. 


Les inconvénients apparaissent aussi évi- 
demment : 


° Il y a appel au traducteur avant cha- 


& = NS 1 
is QG >. 


è 
À 
KT 


que exécution d’une ligne d'où une perte 
de temps assez importante. 

e Dans le cas de boucle, les lignes com- 
prises dans celle-ci sont traduites autant 
de fois que le programme repassera sur 
ces lignes, ce qui occasionne une répé- 
tition d'un travail qui a déjà été effectué, 
mais comme il ne garde en mémoire que 
la traduction de la ligne en cours, il est 
obligé de refaire le travail à chaque fois. 


e Il est impossible, lors d’une mise au 
point d’un programme, d'être sûr qu’on 
a considéré tous les cas de figures lors 
des essais. || peut arriver qu'une partie 
entière du programme n'ait jamais été 
exécutée lors des essais et qu'il y traîne 
une erreur de syntaxe qui, bien sûr, res- 
surgira le jour où le programme viendra 
parcourir cette partie, quelquefois, quel- 
ques années après. |l faudra alors se 


: Jean-Luc AULNETTE 
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replonger dans les subtilités du pro- 
gramme pour corriger cette erreur, d'où 
perte de temps. 

e L'exécution du programme nécessitera 
la présence obligatoire en mémoire vive 
du langage d'application, ce programme 
ne sera pas autonome. 

e Il devra toujours ÿ avoir en mémoire 
vive la totalité du langage source. En 
effet, il est impensable d'ajouter à la len- 
teur de la traduction simultanée celle de 
la lecture de la ligne source sur une 
mémoire morte. 


En définitive, les langages interprétés 
sont des langages faciles à utiliser, 
disons confortables, mais ils sont lents. 


LES LANGAGES COMPILES 


Le principe de l'utilisation du traducteur 
est fondamentalement différent. 

Dans un premier temps, on créera, à 
l'aide d’un éditeur de texte, un fichier 
source. 

Dans un deuxième temps, on fera appel 
au traducteur pour transformer notre 
texte source en un fichier binaire com- 
préhensible par notre ordinateur. 
Jusque là, pas de grande différence. 
Celle-ci intervient dans le fait que l'exé- 
cution ne se fait pas ligne par ligne. Elle 
ne pourra être lancée qu'après la traduc- 
tion totale de toutes les lignes de pro- 
gramme et, bien sûr, dans le cas où 
aucune erreur de syntaxe n'a été détec- 
tée. 

Les inconvénients de ce type de langage 
apparaissent tout de suite. 

e Il n'est pas possible d'essayer le pro- 
gramme ligne par ligne. Îl faudra traduire 
l'ensemble du programme pour en lan- 
cer l'exécution et alors, et alors seule- 
ment, nous pourrons le lancer et détec- 
ter les erreurs de fonctionnement. Il nous 
faudra revenir dans l'éditeur, faire les 
corrections, et de nouveau relancer la 
traduction, puis l'exécution. On n'a pas 
la souplesse du langage interprété car la 
traduction de l’ensemble du programme 
peut demander beaucoup de temps. 


Les avantages d'un tel langage sont 
cependant multiples : 

e L'appel au traducteur se fait une fois 
pour toutes, dans la mesure, bien sûr, où 
il n'y a plus d'erreur. Lors du lancement 
de l'exécution, nous n'en aurons plus 
besoin, nous exécuterons uniquement le 
fichier binaire fourni par lui que nous 
appelerons PROGRAMME OBJET OÙ 
EXECUTABLE. Nous allons gagner beau- 
coup de temps à l'exécution. 

° Puisque l’appel au traducteur ne se fait 
qu'une fois, nous pouvons nous permet- 
tre que celle-ci soit assez longue mais 
très performante. 

e Nous pourrons donc disposer d'un 
code objet plus travaillé et donc plus 
rapide. 

e Nous pourrons aussi, si nécessaire, tra- 
vailler avec des programmes plus encom- 
brants, en effet rien ne nous oblige à gar- 
der la totalité du texte source en 
mémoire vive, seule la présence de la 
ligne en cours de traduction est néces- 


saire. L'éditeur de texte ne nous servant 
plus à rien, nous pouvons l'effacer et 
récupérer cette place pour autre chose. 
Il n'est pas non plus indispensable de 
garder le fichier exécutable en mémoire 


Vive ; au fur et à mesure de sa traduc- 


tion, nous pouvons le sauver sur une 
mémoire morte. 

e Le fichier objet obtenu est ‘‘'exécuta- 
ble'’, c'est-à-dire qu'il ne nécessite plus 
la présence de son langage pour s'exé- 
cuter, il devient autonome. Il reste 
cependant assujetti au système d'exploi- 
tation, mais ce sera la seule contrainte. 
e Toutes les parties du programme 
auront été testées du moins quant à leur 
syntaxe ; il n’y aura plus à y revenir ulté- 
rieurement. 


En définitive, les langages compilés sont 
lourds à l'emploi mais très performants 
du point de vue vitesse et permettent de 
concevoir des programmes plus impor- 
tants, toutes choses étant égales par ail- 
leurs (pour prévenir d'avance les objec- 
tions que pourraient soulever les incon- 
ditionnels du Basic Locomotive). 
Maintenant que nous avons tous les cri- 
tères en main, passons en revue les dif- 
férents langages qui sont mis à notre dis- 
position sur nos machines. 


LE LANGAGE ASSEMBLEUR 


A tout seigneur, tout honneur. || y a très 
peu de différences entre le langage 
assembleur et le langage binaire. Il s'agit 
uniquement de rendre le langage binaire 
plus accessible en laissant aux bons 
soins d'un traducteur assez élémentaire 
le travail fastidieux, pour ne se consacrer 
qu'à l’algorithmique. 

Pour bien comprendre, il suffit de rappe- 
ler qu'un animal à quatre pattes qui fait 
‘’miaou'’ peut être appelé un ‘’chat'’, un 
‘’minet'”, un ‘‘cat’’, un ‘’Katze'”’. Ce ne 
sont que diverses associations de lettres 
qui désignent la même chose. Pour notre 
ordinateur, ce sera la même chose. Il sera 
plus facile de retenir ‘’LD, B,C'’ pour 
copier le contenu du registre C dans le 
registre B que ‘01000001’. On utilisera 
des mnémoniques, ceux-ci dépendront 
bien sûr du type d'assembleur que nous 
utiliserons (ZEN, DEVPAC, MASM, etc.). 
Ce langage s’occupera aussi de l'implan- 
tation en mémoire du programme objet 
et des variables utilisées et de quelques 
autres facilités évidemment très intéres: 
santes lorsqu'il faut utiliser ce moyen de 
programmation. 

Il faut cependant ne pas oublier qu’un 
langage assembleur ne possède aucune 
autre primitive que celle du microproces- 
seur. || s’agit d'une traduction mot-à- 
mot, avec quelques calculs simples en 
plus. Commeillustration, pour faire une 
multiplication, il faut presque écrire une 
page de texte. Par contre, et c'est là sa 
force, ce langage permet d'utiliser tou- 
tes les possibilités de la machine. L'in- 
tégralité de la machine vous est acces- 
sible et vous travaillez avec le maximum 
de la vitesse que vous autorise le micro- 
processeur, mais à quel prix ? Celui d'une 
très grande complexité de programma- 


tion. De plus, il est nécessaire de réécrire 
ce que d’autres ont déjà fait et souvent 
beaucoup mieux que vous. 

Il convient de n'utiliser le langage binaire 
directement ou sous sa forme langage 
d'assemblage que lorsque vous ne pour- 
rez faire autrement, pour des raisons 
de vitesse d'exécution (protocole 
d’'entrée-sortie avec des périphériques où 
le timing est très serré, par exemple), ou 
pour créer une nouvelle primitive indis- 
pensable à votre application qui n'existe 
pas dans le langage que vous utilisez ; 
enfin pour vous faire plaisir. 

Pour des raisons évidentes de rapidité, 
tous les assembleurs sont des langages 
compilés. Ils ne délivrent par contre 
aucun message d'erreur de fonctionne- 
ment, vous obtenez ce qu'on appelle un 
‘’plantage””, il ne vous reste plus qu'à 
éteindre et à rallumer votre machine. 


LE LANGAGE BASIC 


Ce langage est à l'opposé du langage 
assembleur. Les informaticiens qui l'ont 
écrit ont voulu mettre à la disposition des 
usagers un langage : 

+ simple d'emploi, le plus proche possi- 
ble du langage naturel (américain quand 
même), 

° où tout est sacrifié à cette nécessité 
de simplicité de premier contact. La règle 
étant que tout ce qui peut être pris par 
défaut doit l'être pour que les difficultés 
de l'informatique soient le moins possi- 
ble perçues par l'utilisateur. 

e qui permette d'accéder avec le mini- 
mum d'effort au maximum de possibili- 
tés de la machine sur lequel il est 
implanté. 


Il en résulte que ce langage est un lan- 
gage interprété et qu'il est assez lent. De 
plus, c'est évidemment l'inconvénient 
de ses avantages, il devient d'une com- 
plexité presque insurmontable lorsque les 
programmes s'allongent. 

e Comment voulez-vous vous rappeler 
six mois après, lorsque vous reprenez un 
programme pour le modifier, du rôle de 
chacune des variables que vous avez uti- 
lisées ? : 

e Les ‘’'GOTO xxxx'’ ou les ‘’GOSUB 
xxxx'” où xxxx indique une valeur numé- 
rique désignant un numéro de ligne et 
rendent le programme difficilement modi- 
fiable. Cette facilité offerte de prime 
abord semble offrir le mérite de la sim- 
plicité, il s'avère qu'elle devient très rapi- 
dement un obstacle très génant. 

e Les ‘’SUBROUTINE"”, ou en français, 
les sous-programmes, sont simples 
d'emploi certes, mais leur simplisme 
devient vite un obstacle à une utilisation 
rationnelle de ceux-ci. Il serait nécessaire 
qu'ils soient totalement indépendants du 
programme principal. Le basic manque 
de modularité (division d’un ensemble en 
nombreuses petites parties autonomes). 
e Ce langage n'est pas extensible. Il est 
très difficile de créer de nouvelles primi- 
tives. Il faut faire appel au RSX ou au 
binaire, c'est assez lourd d'emploi. 

e Afin de rendre le maximum de choses 
transparentes à l'utilisateur, le Basic 
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n'optimise pas l'occupation mémoire des 
variables, il en résulte une perte de place 
assez importante. 


En conclusion, le Basic est un très bon 
langage d'initiation à l'informatique, mais 
il ne faut pas oublier que beaucoup de 
choses sont prises par défaut et que 
cette apparente simplicité cache de mul- 
tiples problèmes sous-jacents. 


LE LANGAGE PASCAL 
TURBO DE BORLAND 


Comme vous vous en doutez un peu, il 
doit présenter un grand nombre d'avan- 
tages puisque c'est pour mieux les met- 
tre en évidence que ce long préambule 
a été écrit. 

Ce langage, comme tous les autres, se 
compose d'un éditeur de texte, d'un tra- 
ducteur du genre langage compilé et 
d'un lanceur d'exécution. || fonctionne 
sous les systèmes d'exploitation CP/M 
2.2 ou CP/M Plus et bien sûr pas sous 
AMSDOS. 

Tout d'abord, son éditeur est du type 
pleine page et non pas du type ligne 
comme l'éditeur du Basic, c'est quand 
même plus souple d'emploi. Le code 
source obtenu est du type ASCII, le 
même que celui que vous obtenez avec 
l'option ‘’,A'" lors du SAVE du Basic, il 
y a donc possibilité d'écrire vos textes 
Basic avec cet éditeur et ensuite de les 
lancer sous AMSDOS. Ce n'est pas sa 
vocation première mais qui peut le plus 
peut aussi le moins. Il utilise des carac- 
tères de contrôle qui sont redéfinissa- 
bles, vous pourrez donc adapter ceux-ci 
à vos habitudes, de base, il essaie d'être 
le plus près possible de Wordstar. 

Son compilateur présente la particularité 
d'une très grande rapidité (100 lignes à 
la seconde). Et là, il devient génial, 
lorsqu'il détecte une erreur, il rentre auto- 
matiquement dans son éditeur de texte 
et se place sur l'erreur de syntaxe trou- 
vée. Vous avez donc un langage compilé 


sur : livres, logiciels, accessoires, 
périphériques, sur présentation 
du magazine (jusqu'au 31/12/86) 
1, rue du Plat 
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qui présente aussi tous les avantages du 
langage interprété. 

Il est modulaire de par essence même. 
Un programme Pascal, c'est une suite de 


‘petits outils que nous forgerons lente- 


ment et que nous utilisons quand nous 
en avons besoin. Chaque petit module 
peut être totalement indépendant des 
autres. Ce qui fait que sa mise au point 
est très commode et les modifications 
ultérieures très simples puisque c'est 
vous et vous seul qui décidez ce que 
vous voulez qui soit commun aux divers 
modules. Un programme peut donc ainsi 
être écrit par une équipe, chacun travail- 
lant dans son coin, il suffit simplement 
de s'entendre sur les entrées et les sor- 
ties de chaque module, qui plus est, le 
nom des variables utilisées peut n'avoir 
aucune importance. Ces petits modules 
deviennent très polyvalents. Pour se ser- 
vir de ces modules, il suffit de les appe- 
ler par leur nom, ils sont devenus des pri- 
mitives du langage. 

Pascal est donc modulaire, extensif et 
chaque petit module peut être rendu 
totalement indépendant. Pascal présente 
tous les avantages d'un langage inter- 
prété et tous les avantages d’un langage 
compilé. 

Est-ce tout ? Non ! 

Pascal présente aussi tous les avantages 
du langage assembleur. Lorsque vous 
désirez passer en assembleur, vous le 
signalez par un ‘’INLINE; BEGIN’ et vous 
écrivez en hexadécimal quand vous dési- 
rez reprendre Pascal, vous le signalez au 
compilateur par un ‘’END””’. Le problème 
du passage des paramètres si complexe 
en Basic est ici transparent. 

Puisque vous avez à votre disposition 
toute la puissance de l'assembleur, rien 
ne vous empêche d'utiliser, en plus, la 
bibliothèque du Basic qui est en ROM. 
Ceci est vraiment un p/us en faveur de 
Pascal Turbo. 

Autre avantage : Pascal Turbo est aussi 
implanté sur tous les appareils compati- 
bles IBM PC et pratiquement sur tout 


Micronaute 


LE SPECIALISTE 
AMSTRAD à NANTES 


464-6128-8256 


périphériques 
+ de 100 logiciels 
disquettes, cassettes 
semi-pro ou particuliers 


9, rue Urvoy de St. Bedan 
44000 NANTES 
Tél.: 40.69.03.58 


appareil fonctionnant sous CP/M et 
MSDOS. Ce qui veut dire en clair qu'un 
programme écrit en Pascal Turbo sur votre 
AMSTRAD tournera sans aucune modi- 
fication sur n'importe quel ordinateur 
fonctionnant sous ces systèmes. Aucun 
autre langage n’a cette portabilité. À une 
époque où il est fortement question 
qu'AMSTRAD sorte un compatible 
IBM PC n'est ce pas tentant ? 

Pascal Turbo permet aussi de beaucoup 
mieux gérer les fichiers. Il permet d'en 
ouvrir 5 en même temps en lecture et en 
écriture ; on est loin des faibles possibi- 
lités de Basic en la matière. 

Quel effort va-t-il vous demander ? Le 
même que celui qui serait nécessaire 
pour passer de la conduite d'une voiture 
automatique (Basic) à celle d'une voiture 
à boîte de vitesse classique (Pascal). 
Hors de question de passer à la série 
grand tourisme (Assembleur) et encore 
moins à la formule 1 (Binaire). 

Alors, pourquoi ne pas vous laisser 
séduire et nous rejoindre dans le club de 
plus en plus fréquenté des utilisateurs du 
Pascal ? Il n’est pas inutile de signaler 
que Pascal Turbo est de plus en plus 
employé dans l'enseignement supérieur 
comme langage d'initiation à l'informa- 
tiquee 


Prochain article : L'éditeur de texte de 
Turbo Pascal. 


A SUIVRE... 


Spécialiste Amstrad. 


Périphériques, 

librairie, consommables, 
logiciels professionnels, 
langages et jeux 


78, Bd de la Gare 
31500 TOULOUSE 
Tél. 61.80.85.08 
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Pour Noël UN BEAU CADEAU DE NOEL 


réunis CTEL pour votre CPC464 - CPC664 - CPC6128 
avec 
Toutes les Télécommunications 


avec le CPC2 


. Emulation MINITEL (Télétel 1, 2, 3) 

. Emulation PRESTEL (serveur anglais) 

. Emulation TERMINAL (TRANSPAC, ORDINATEUR) 

. Transfert de PROGRAMMES (ou fichiers) 

. 30 instructions BASIC RSX pour programmer 
votre propre serveur 

. MODEM universel avec toutes les caractéristiques 
V21, V23, Bell 202, Bell 103 


EN ROM 
Exceptionnel Noël TT 
du 20 Nov, 86 au 31 Déc. 86 Incroyable le tout 2290 F 
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fnprimante matnicielle n 100 Cp 

counien. fnpnession bi-dinectionnelle a 9 aiguilles 
elle compente une alimentation papien continu ou en 
deuillens comnutable me Gintendace centnonics 7/8 
bits et une compatibilite EP8ON RX 8x 

La Pannsonic KX-P 1080 est equipe d'une cawette 
nuban avec nésenvoin de nenctivntion inconpene 
d'une dunée de vie de 3 Million de canactenes.ln 
aélecteun  Anontal @ pennmet Les  denction 
aphique, brouille et espacement proportionnel 

LA KX-P 1080 EST COMPATIBLE AMSTRAD CPC/PCHE 
MODEL KX-P 1091 COMPATIBLE AMSTRAD PC 1510#/IBN8 


REUENDEURS BLENVENES 3190 F TTC 


EPSON AMSTRAD et IBM sont des marques deposees COMPOSITION SUR AMSTRAD + KX-P 1080 


IVELEG 62,Rue du 61 de Gaulle 94430 CHENNEVIERES Tel : (16-1)45.76.73.13 


MICRO FAIR 


présente... 


MULTIFACE 2 POUR AMSTRAD 464/664 ET 6128 !! Transfère 100% des logiciels ! 
MULTIFACE 2 est le seul appareil capable de stopper TOUS les logiciels à n'importe quelle adresse, vous per- 
mettant d'en faire EFFICACEMENT et AUTOMATIQUEMENT une copie de sauvegarde sur disquette ou cas- © 
sette !!! 
MULVENEE 2 est une interface, c’est-à-dire qu'elle ne prend aucune place en RAM et n'a donc pas S 
: besoin d'être chargée ; un simple appui sur le bouton rouge 
PPOMTCLERBELL LEFL LIEN suffit. 
MULTIFACE 2 est géré par des menus, rendant GS» 
n Son utilisation particulièrement simple. S 
À LEP AUVAAU/VRSÆ  MULTIFACE 2 vous offre un puissant MONITEUR CG» 
vous permettant, en utilisant une fenêtre, de 
dumper la mémoire (ASCII, HEXA et , : 
DECIMAL), de la modifier à volonté (idéal … «QE nes 
pour vos vies infinies etc...), de sauter à 7Q du moniteur diminuant les 
CEE RRRP"R) n'importe quelle adresse et de 70 reflets désagréables et fatigants. 
CD S D RC ALER) visualiser les registres du Z80 ; 
et ceci MEME pendant le = 
déroulement du programme!!! “« 
MULTIFACE 2 est un S 
produit professionnel @ 
de toute 1ere classe, > 
possédant 8 kO © 
de ROMet8 
kO de RAM. AO 
Equipe d’un bus d'extension, MULTIFACE 2 Q 
permet de raccorder d’autres périphériques. 5 
Un système de compression est utilisé pour 2 
le rechargement rapide et une prise << 
minimale de place sur disquette ou RS 
cassette. Par exemple, les logiciels ,@ 
de 64 kO sont rechargés en 20 ÿ 
secondes environ à partir 
d'une disquette, et en 5 
minutes à partir d’une © 
cassette (s'ils sont AN 
sauvegardés à 5) 
vitesse Ultra- 2 


En supprimant, la: 
brillance de l'écran, 
permet de longues 

heures d'utilisation de 

a votre ordinateur sans fatigue 

OS oculaire. 


Se BON DE COMMANDE 
(à photocopier si vous ne voulez pas découper votre magazine !) 
NOM SR RS EN RE OR ER neue Ut ee BEMULTIFAGESD RE Re nes Re nee 575 F. TTC 
PRENOM ER RE MERS ES Ra Ecran pour CPC : 
ADRESSES ME ER RE RE AE aie la he nee EU LU ass EMoniteurcouleur 5227240, ame, 229 F. TTC 
SATA RSR AR PT Er LS M PP PEU LEE PA EMonrteurVentr ren ten Enrene CAT OS EMETE 
Re Ra nn VAR ER RMS I fe 19 Lande DU SN Dome Eee Bl'Ecran PEWPR LS EE ER RE 200 FU ERC 
RARE Ne ratare e IT ENS et RSR Det lei OT ie I TS ee tete Joindre un chèque du montant de votre commande + 10 F 
de port. 
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MICRO FAIR - 255 Bd. Voltaire - 75011 PARIS - Tél. : 43.72.30.78 
et toujours les produits VORTEX disponibles chez MICRO FAIR 
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ne expédition à bord d’un sous-marin U 79. 

ous êtes ASPIRANT embarqué avec un équipage de 35 
hommes et vous pourrez devenir AMIRAL. Pour celà, il E LOGICIEL DU MOIS SUR AMSTAR DE NOVEMBRE 
vous faudra manœuvrer à la perfection car dans ce jeu, LA PRESSE UNANIME: 
toutes les phases du pilotage d’un sous-marin sont à 
respecter. C'est certainement la meilleure réalisation du genre 
Vous serez le maitre des combats assisté par les sur amstrad.. 
instruments de bord (sonar, radio, radar). (CPC Novembre 86) 
Vous aurez à détruire la flotte ennemie sur differentes 
cartes marines. 

Le ‘‘hit’”’ des logiciels de fin d'année 
absolument ! 


Cette simulation est exeptionnelle. Jamais avant aujourd’ 
je n'ai vu un tel souci de détail et de finition... 
(AMSTAR Novembre 86) 


rer RAD disquette 3” ; C'est une simulation de sous-marin. Une bonne même... 
À -: en =- | THOMSON Les mots me manquent pour vous décrire ce jeu... 
5 | RS Pi M05/M06/T07.70/T08/T09/T09 + (HEBDOGICIEL Octobre 86) 

| Disquettes 3’1/2, 5’’1/4 


Lavnnies Cassette C'est en résumé une simulation réussie ou l'intérêt 


reste élevè très longtemps... 


Z.A. de Lumbin - 38660 Le Touvet - Tél. : 76 08 29 29 
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VILINK : 


LE PCW COMMUNIQUE 


Denis BONOMO 


nterface bien concue, servie par un logiciel intelligent, VTLINK 
confère au Minitel la puissance indispensable à son utilisation 
professionnelle : celle de l’ordinateur. 


ue aa 
vue us 
LE ES 


Le PCW va utiliser le modem du Minitel 
pour communiquer et ses vastes possi- 
bilités internes pour traiter les informa- 
tions. Au moyen de VTLINK. l'utilisateur 
pourra se connecter sur Télétel, transfé- 
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rer ou échanger des fichiers... surtout 
faire des économies qui amortiront rapi- 
dement le coût de l'interface s'il fait de 
nombreuses consultations. 

Ces consultations peuvent être automa- 


tisées en tout ou partie, au moyen d'un 
fichier de commande spécialisé. Vous 
avez l'habitude de consulter les cours de 
la bourse ? Rien de plus facile ! Dès les 
premières consultations, vous allez créer 
un fichier de commandes qui décrira à 
l'ordinateur, la suite d'opérations à effec- 
tuer. Les accès futurs seront considéra- 
blement simplifiés. L'écran peut égale. 
ment afficher un chronomètre et un indi- 
cateur de ‘’remplissage mémoire’’. 
Pour une messagerie électronique, il est 
possible de préparer le texte à émettre 
et, après s'être assuré de la disponibilité 
de la messagerie, de déclencher son 
expédition. Un éditeur de fichier (utilisé 
pour les commandes) pourra vous aider 
lors de la composition de messages 
courts. 

L'échange de fichiers à distance a été 
prévu : vous allez désormais pouvoir 
profiter du travail accompli par un ami, 
éloigné géographiquement. Attention, le 
modem du Minitel impose certaines res- 
trictions clairement exposées dans la 
notice VTLINK: Ainsi, les fichiers texte 
pourront être transmis mais... sans let- 
très accentuées. Les fichiers .BIN ou 
.COM sont exclus car ils peuvent con- 
tenir certains codes actifs pour le modem 
du Minitel. 

L'émission-réception de fichiers textes 
peut être entièrement automatisée. 
Bien entendu, une sortie sur imprimante 
permet de conserver une trace écrite des 
écrans qui vous intéressent, avec quel- 
ques limitations néanmoins, sur les gra- 
phismes Vidéotex. 

Le manuel utilisateur de VTLINK com- 
porte 35 pages qui détaillent clairement 
le mode d'emploi du produit. 

VTLINK a été conçu par COSTERCO. 
Peu encombrant, le boîtier de 
110 x 60 x 30 mm se connecte à l'arrière 
du PCW. Le câble établissant la liaison 
au Minitel est fourni. Sa longueur, d’er- 
viron 2 m, nous a paru bien suffisante. 
Avec un coût de 1200 F HT, VTLINK 
apporte un confort non négligeable à 
tous ceux qui utilisent fréquemment leur 
Minitel pour des applications 
professionnelles. 

VTLINK est commercialisé par LOISI- 
TECH, annonceur dans CPC. Pour plus 
de renseignements et un meilleur accueil, 
se recommander de CPC au (1) 
48.59.72.76. 


EN FINI 


CTEUR 5° 1/4 
pour AMSTRAD 


1 M OCTETS 
1 699 F TTC 


"@® LE JASMIN AM 5D 


le 2° lecteur double têtes, double ou quadruble densité, 
indispensable pour votre AMSTRAD 
CPC 464 - 664 - 6128 et PCW 8256/8512 


Ne payez plus vos disquettes 3: 
à OÙ F. on trouve des disquettes 


= ri à = 
9 1/4 à moins de 7 F 
Accéder à toute la bibliothèque CP/M éditée sur 5’ 1/4 


grâce aux utilitaires disponibles chez « WILD WEST », 
84760 St-Martin de la Brasque. Tél. : 90.77.61.36 


JASMIN AM-5D, le lecteur double têtes Puissant mais Econome 


Plus besoin de retourner la disquette. La sélection de face se fait par inverseur avec indicateur lumineux. LISTE DES POINTS DE VENTE 


LL LLLLLLL ELLE LLL 


Lecteur 51/4. JASMIN AMP5D: formaté, entièrement compatible AM5DOS, PRIVILEGIES JASMIN AM65D 51/4 
CP/M.22 et CPM+, livré avec disquette utilitaire de formattage et de dico 
dérdisquette . 322: surround neue: 1 699,00 F TTC 14000 CAEN - LOISIR INFORMATIQUE, 39/41, Rue de l'Oratoire, tél. 31.85.18.77 
Lecteur 5” 1/4 JASMIN AM5D + - 1 M : double têtes, quadruble densité, 720 K for- 33000 BORDEAUX - L'ONDE MARITIME, 257, Rue Judaïque, tél. 56.24.05.34 
matté, entièrement compatible AMSDOS et CP/M , livré avec disquette utilitaire de duplication, format- 33000 BORDEAUX - ESAT SOFTWARE, 55, Rue Tondu, tél. 56.96.35.23 
tage et utilisation en 80 pistes. . .................................. 1799,00 F TTC 33000 BORDEAUX - SON VIDEO 2000, 31, Cours de l'Yser, tél. 56.92.91.78 
Cable de liaison pour CPC 6128/664..................... 155,00 F TTC 33000 RENNES - MICRO C, 3, Bd. de Beaumont, tél. 99.31.70.41 
Adaptateur AD 12 - VDC : pour l'utilisation avec des moniteurs sans sortie 12 V. 60,00 F TTC 37170 CHAMBRAY LES TOURS - Centre commercial du CAT, tél. 47.27.29.00 
Kit de liaison du JASMIN AM5D + : avec le PCW 8256/8512... 250,00 F TTC 511000 REIMS, 2, Av. de Laon, tél. 26.47.44.14 
Jasmin-Booster : adaptateur à rajouter derrière l'AM5D ou AMSD + leur permettant d'être utilisé en maître ou esclave, 64000 PAU - BASE 4, 11 Rue Samonzet, tél. 59.83.78.78 
et pour le lecteur 1 M de se comporter en 500K. Disponible en octobre : Prix indicatif. . . ...... 350,00 F TTC 69000 LYON - FRANCE DISQUETTES, 255, Av. Berthelot, tél. 78.01.79.63 
Disquettes 5°’ 1/4, l'unité.................................. 7,00 F TTC 75014 PARIS - VIDEO SHOP, 251, Bd. Raspail, tél. 42.96.93.95 
Imprimante spéciale AMSTRAD AM PRINTER : Silencieuse - 50 CPS - Qualité cour- 75001 PARIS - VIDEO SHOP, 50, Rue de Richelieu 
rier - 132 colonnes en contractées. ................................ 1995,00 F TTC 75010 PARIS - GENERAL VIDEO, 10, Bd. de Strasbourg, tél. 42.06.50.50 
Cable CENTRONICS pour AMSTRAD................... 175,00 F TTC 75011 PARIS - VISMO, 84, Bd. Beaumarchais, tél. 43.38.60.00 
Les prix en boutique comprennent le port. 75019 PARIS - DFI Centre de démonstration, 66, Rue d'Angers 
AMSTRAD - CPC 464 - CPC 664 - CPC 6128 et PCW 8256/8512 - AMSDOS sont des marques déposées d'AMSTRAD. JASMIN AM-5D est une marque déposée de T.R.A.N. sarl. CP/M est une marque déposée de Digital Research 
* 500 K et 1 M octets, non formattés Tous nos prix sont en fonction de nos stocks au 1° Septembre 1986 
BON DE COMMANDE à T.R.A.N. sarl - 53, impasse Blériot NOUVEAU PAYEZ PAR CARTE BLEUE / INTERBANCAIRE 
83130 LA GARDE - Tél. : 94.21.19.68 
Crédit possible. Nous téléphoner Date d'expiration — ]— SEE 


Veuillez m'envoyerdtURGENCE Désignation | Quantité | Pxunie re | were 


Port gratuit en France pour achat de plus de 500 F TTC - Forfait de port en France pour achat de moins de 500F TTC: 40,00F TTC 
supplément contre remboursement : 120,00 F TTC. 
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‘PROGRAMMES 

DE MATHEMATIQUES 
SUR AMSTRAD" 
(EYROLLES) 


P. Beaufils, M. Lamarche, Y. Muggianu 


Salut, les matheux ! Eh oui, le premier 
trimestre se termine et vous ne savez 
rien encore sur la transformée de Fourier. 
Alors lâchez le joystick, cet ouvrage est 
pour vous. Des graphiques simples aux 
représentations fractales, vous savez, ce 
relief de montagne qui se dessine sur 
votre écran, en passant par les polyèdres 
‘fil de fer’”, rien de tout cela ne vous sera 
plus étranger. 

Tous les programmes de cet ouvrage 
sont écrits en Basic, la liste des variables 
est dressée, les commentaires ne man- 
quent pas à l'appel et chaque fonction 
est illustrée. 

Fini le papier millimétré, vive le CPC ! Les 
courbes les plus complexes traversent 
votre écran, et si vous possédez une 
imprimante, le plaisir sera plus grand. 
Quand nous vous disions que vous le 
lâcheriez, ce joystick ! 


"LE LIVRE DU PC 1512 
(MICRO APPLICATION) 
99 F 


Le PC 1512 n'est pas encore sur le mar: 
ché et déjà les premiers ouvrages vien- 
nent s’aligner sur les étagères des librai- 
res. Un des avantages de ce livre est cer- 
tainement de donner au lecteur tous les 
renseignements que... les revendeurs 
AMSTRAD ne peuvent encore lui donner 
sur le 1512, faute d'avoir la machine ! 
L'ouvrage reste très général, se présen- 
tant comme un vaste tour d'horizon du 
PC 1512 : mise en route, environne- 
ment, structure interne, liaisons, langa-" 
ges, périphériques, etc., logiciels utilisa- 
bles. 

Même si les explications développées 
dans ce livre semblent, en grande partie, 
extraites des manuels d'accompagne- 
ment, elles offrent l'avantage de faire 
une synthèse qui permettra à l'acquéreur 
potentiel, de se rendre compte de ce 
dont il disposera avec le PC 1512. 


‘"’FONCEZ AVEC 
L'AMSTRAD PC 1512" 
(CEDIC/NATHAN) 


C'est AMSTRAD qui ferait bien de 
sortir son 1512 parce que, sous 
peu, il y aura plus de bouquins à son 
sujet que de machines à acheter |! 
Avant de foncer sur votre 1512, 
vous lirez avec intérêt ce livre qui 
effectue un tour d'horizon assez 
complet de la machine. Vous 
apprendrez que le 1512 est ‘‘pres- 
que compatible'” avec l'IBM. 
Vous ne connaissez pas encore MS- 
DOS ? Et bien, cette lacune sera 
rapidement comblée. DOS+ ne 
vous dit rien ! Faites sa connais- 
sance ! Ces chapitres sont intéres- 
sants et pourront servir de guide à 
l'utilisateur. GEM et Basic 2 ne sont 
pas laissés pour compte. 
Plusieurs pages sont consacrées à 
la communication, avec le détail de 
câblage de la RS 232 et l’utilisation 
par MS-DOS. 

Les derniers chapitres traitent des 
périphériques disponibles et des 
logiciels utilisables. En 200 pages, 
le lecteur se fera une idée assez pré- 
cise du matériel dont il va disposer. 


Re de US UC 


Pour nous aider à vous proposer des articles et des listings tou- 


| jours plus intéressants, nous vous invitons à les noter en fonction 
de l'intérêt que vous leur accordez. 
CPC sera ainsi encore plus proche de ses lecteurs ! 
Pour vous encourager à participer à ce sondage mensuel, nous 
tirerons au sort 3 bulletins qui recevront un cadeau surprise. 


page nant 


83 Les Turbo fractals 


| 7 ET 
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Made ME D AN D RE 


Na: Pré Je possède un D CPC 464 (drive) [I 664 [1 6128 
ns sde 2 Bons rite rénom .............. 1 PCW 8256 [1 8512 C) PC 1512. 


Adresse : ...... ON MAT ETS em de Ua A retourner à : Editions SORACOM ‘'Sondage Mensuel 
Age : CPC’, La Haie de Pan, 35170 Bruz 
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La place réservée aux potites annonces est 
limitée. En conséquence, celles-ci passent 
dans leur ordre d'arrivée. Par contre, les peti- 
tes annonces farfelues sont systématique- 
ment rejetées. De même, commeil est peu 
probable qu'il existe des ‘’généreux dona- 
teurs'’ de matériels ou de logiciels, les peti- 
tes annonces faisant appel à ces philantro- 
pes ne seront insérées que si la place libre 
le permet. 

Seront refusées toutes les annonces visant 
à vendre ou échanger des listes ou copies de 
logiciels non garantis ‘’d'origine”’, ainsi que 
toute annonce incitant au piratage. 

En conséquence, réfléchissez bien avant 
d'envoyer vos textes. 

Les petites annonces doivent impérativement 
nous parvenir sur la grille (découpée ou pho- 
tocopiée), le texte étant rédigé à raison d'un 
caractère par case. 

Enfin, toute annonce non accompagnée de 
timbres ne sera pas insérée. 


Vends CPC 464 vert + drive DDI + adapt. TV + 
joy + RS 232C + livres + K7 + disques (jeux + 
logiciels) : 4000 F. Tél. 48.81.87.65 (19h). 


Vends AMSTRAD CPC 664 mono + imprimante 
DMP 1 + disquettes + livres pour 5000 F (état 
neuf). Tél. 45.57.58.59. 


Vends CPC 6128 + 30 discs + magnéto K7 + 
joystick + 35 revues + 7 livres, valeur 8000 F, 
vendu : 5000 F. Tél. (1) 48.77.66.50 après 18h30. 
Facilités. 


Vends AMSTRAD CPC 464, monit. coul. + manuel 
+ nbx jeux : 3200 F.F. RISSER, tél. 45.85.02.03. 


Vends Aquarius | avec lecteur prise Spirituep et 
accessoires : 1500 F. Stéphan, tél. 48.80.81.59. 


Vends AMSTRAD CPC 464, couleur + livres + 
nbx jeux : 3200 F, exc. état. T11. (1) 39.69.12.21 
le soir, Hugues FAURE, 78 BOUGIVAL. 


Vends CPC 6128 mono sous garantie + 25 dis- 
quettes + 100 logiciels + joystick + magnéto 
(avec cordon) + livre s: 4500 F. Tél. (1) 
69.06.15.22. 


CPC 16 À 
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Vends AMSTRAD CPC 464 + 11 K7: 


1500 F. 
Adaptateur CPC 464 Péritel : 200 F. Reuves 
Microstrad : 100 F (n° 1 à 7). Tél. 79.75.04.43. 


Vends cause départ étranger fonds de commerce 
micro-informatique centre ville, galerie marchande, 
St. Lô, Manche. Tél. 33.57.23.10. 


Vends ZX81 + RAM 16 K + magnéto : 600 F. 6 
livres + 14 n° Ordis : 500 F. Chante, 92350 PLES- 
SIS ROBINSON, tél. 43.50.23.70. 


ATMOS + JASMIN recherche contacts pour 
échanges : jeux de réflexion, originaux, utilitaires. 
R. MOLLES, Rés. des 4 Vents, 49500 SEGRE. 


Vends MO5 + magnéto + K7 jeux + crayon opti- 
que + adaptateur TV + péritel (jamais servi) : 
2200 F. Tél. 64.93.13.60. 


Vends interf. ECSI + joystick : 300 F. Cherche 
Amplibus + Sedoric + logiciels Jasmin Calc + 
Easytext + Easydisk + Jasmitel. Tél. 
87.02.44.23. 


Cherche contact sur Sedoric pour échange. Tél. 
67.65.12.33 ou 67.29.55.53. 590 rue de la Caval- 
cade, 34000 MONTPELLIER. 


G. HENRIAT recherche logiciels disk Jasmin 2 et 
K7 Atmos. Vends ou échange mini-cassette Oric. 
Ecrire 5 rue G. MOQUET, 91390 MORSANG. 


Vends CPC 6128 vert + RS 232 + logiciels + 13 
disquettes vierges + boîte de rangement + joy- 
stick + bouquins + 2 jeux + garantie 6 mois. Tél. 
43.75.61.08. 


Vends K7 AMSTRAD (Rocky Horror Show, Ghost'n 
goblin, Ludodessin, Knight tyme, etc.) : 460 F les 
13 ou de 35 à 60 F pièce. Tél. 43.74.52.05. 


Echange cause DBase Il clavier 664 + DK syst. + 
doc + 500 F contre clavier 6128 + DK Syst. + 
doc. Tél. (1) 45.28.58.99. 


Vends AMSTRAD CPC 464 coul. + joystick + 100 
jeux et revues 03/86 sous garantie : 3500 F. Tél 
42.60.03.48 après 20 h. 


Cherche revues CPC n° 1,2, 3, 4. Achète ou pho- 
tocopie contre cadeau prix équivalent. Tél. 
42.69.16.80 le soir. 


ANNONCEZ-VOUS 


les petites annonces et les messages 


Coupon à renvoyer accompagné de 3 timbres à 2,20 F à 
SORACOM, La Haie de Pan, 35170 BRUZ 


Vends CPC 464 coul. + drive DI 1 + joystick + 
nbx programes + livres : 4700 F à débattre. Tél. 
43.42.51.06. 


Vends CPC 6128 moniteur coul. garantie fin déc. 
+ 10 disquettes programmes + joystick : 5000 F. 
Serge au 60.14.20.21 (Palaiseau). 


Cherche explications sur le jeu Bad-Max, si possi- 
ble très détaillées. Guillot David, 51 rue des Prai- 
ries, 14160 DIVE SUR MER. 


Cherche photocopie notice Tasprint + Tascopy en 
français. Frais remboursés. Mile CANEVET, 21 rue 
Cavaillon, 83330 LE BEAUSSET. 


La sécurité micro et RAM. Vends alim. protégée 
chutes, hausses tension (ex.: orage) : 198 F. J.M. 
BRUN, 1001 av. Stroch, 84200 CARPENTRAS. 


Vends AMSTRAD CPC 464 mono + drive + péri- 
tel + 80 log. sur cassettes, le tout : 4000 F. Tél. 
23.74.47.62, M. LEQUEUX, 02200 SOISSONS. 


Vends AMSTRAD 464 coul. + drive DDI 1 + impr. 
DMP 1 + livres : 7000 F. Pascal BONNEFOI, 
01390 MIONNAY, tél. 78.91.83.32. 


Vends CPC 6128 déc. 85 + adapt. coul. + joy- 
stick + magnéto + 30 disc. + aAppl 5, 7, 9, 10, 
14 + 30 revues. Val. 8000 F, vendu 5000 F, faci- 
lités. Tél. 48.77.66.50. 


Vends originaux : 60 F l’un ou 200 F le pack de 3 
+ un copieur gratuit aux 3 premiers appels. Tél. 
54.74.39.74. 


Vends AMSTRAD CPC 6128 coul. (6/86) + DMP 
2000 (8/86) + listing + DBase 2 + manuel + 
joystick + jeux + livres + logiciels. Tél. 
60.05.53.58 après 20h. 


Vends 6128 coul., joystick, 5*1/4, livres, nbx uti- 
litaires, nbx jeux, revues : 7000 F à débattre. Tél. 
47.26.93.88 après 19h. 


6128 cherche et échange logiciels éducatifs de tou- 
tes sortes. P. LENOIR, 25 rue H. de Balzac, 78180 
MONTIGNY, tél. 30.64.55.91. 


Vends Thomson n° 5 + lect. disquettes + CR. OP 
valeur : 5000 F, vendu : 4500 F. Tél. 69.48.34.16 
après 18h. 


ee 


Vends ZX81 16 K, jeux : 500 F. Spectrum 48 K 
Péritel, jeux, ZX2 + QS2 : 1200 F. Laser 310 


complet 8 couleurs : 1000 F. Philippe au 


60.46.49.86. 


Achète lecteur DD1 complet + imprimante pour 
CPC 464. Paul SERRANO, 24 Bd. Lucien Sampaix, 
69190 ST. FONS. 


Vends cassette AMSTRAD CPC 464 ou Schneider 
(Master of the lamps) état neuf. Tél. 21.49.67.65 
après 18h. 


Cherche contacts pour tous échanges 464, 6128, 
CPW. Alain, tél. 39.64.78.49, réponse assurée. 


CPC 464 coul. (1 an) + drive DDI 1 + logiciels + 
crayon opt. + livres : 4500 F. Philippe Blondel, tél. 
39.12.29.54. 


Vends Sharp MZ 820 + Basic + manettes + livres 
+ cassettes + moniteur N/B : 2350 F. Tél. 
45.94.09.54 après 20h. 


Je fabrique des jeux, je les vends à très bas prix : 
10 F max. Me téléphoner au 68.20.51.74 et, à par- 
tir du 1°" septembre 86, au 68.21.64.15. 


Vends K7 pour CPC 464 : 3D Boxing, 3D Stuntri- 
der, Sorcery, Exocet, Salut l'Artiste, Initiation 
Basic. Frédéric au 74.92.54.51. 


Vends livres sur AMSTRAD (PSI, Sybex, Micro 
Application), prix cat. —40 %, tbe, liste sur 
demande. Tél. 21.28.68.69 (Lens). 


Vends interface disquette DDI : 180 F. Vends col- 
lection CPC 1 à 13 : 130 F tbe. Tél. 21.28.68.69 
(Lens). j 


Vends 464 mono + adapt. péritel + mém. 64 K 
+ drive + autorise copie 200 progs. Prix à débat- 
tre sur 3500 F. Tél. 30.92.43.55 Jacky. 


Club AMSTRAD à Angers : Westrad Micro Club. 
Renseignements à Jacky BARRETEA, tél. 
41.47.08.97. 


Vends Sharp MZ 700 64 Ko + magnéto K7 + 10 
jeux (sept. 85) : 1200 F. Tél. 97.41.53.27. 


Vends CPC 464 couleur + DDI + 2 joysticks + 
cassette + disquettes + Bible + livre DDI + Firm- 
ware + revues : 5000 F. Tél. (1) 60.16.87.46. 


Vends cause PC professionnel CPC 6128 moniteur 
couleur + imprimante OKI Microline 80, état neuf : 
6800 F. Tél. 84.71.05.52. 


Recherche correspondants pour échanges de logi- 
ciels originaux. Tél. 51.38.62.80 après 20 h. 


Vends sur Metz CPC 464 couleur, état neuf + 
manettes + manuel + nbx jeux + util. + 13 pre- 
miers numéros de CPC, le tout : 4200 F. Tél. 
87.66.20.48. 


Vends CPC 6128 vert + drive 5 pouces + 150 pro- 
grammes : 6500 F ou échange contre PCW 8256. 
F. MARTY, tél. 63.60.89.74. 


Vends DBase Il 6128 ou PCW neuf, cause achat 
gestion fichier. Prix : 550 F, envoi CR. Tél. 
31.34.71.05, laisser numéro téléphone sur répon- 
deur. 


Vends CPC 464 + moniteur monochrome + logi- 
ciels divers + revues : 2500 F. Tél. 42.87.64.29. 
à Rognac. 


Echange CB Sidebander 6 ou agrandisseur photo 
contre ordinateur Amstrad. Tél. (1) 45.54.84.96 
le soir, Jean-Paul (1) 46.03.07.06 bureau. 


Vends Amstrad CPC 464 mono + adaptateur péri- 


tel MP 1 + logiciels + joystick : 2500 F à débat- 
tre. Tél. 73.68.48.07 (P. DOD)I. 


Vends imprimante DMP 1 exc. état : 1500 F. Tél. 
21.55.21.01 aux heures de bureau. 


Cherche utilitaires en tout genre. Doc Textomat, 
Datamat, Calculmat. Greg MILLET, 222 les Pon- 
tents, 39400 MORBIE, tél. 84.33.10.24. 


Vends AMSTRAD CPC 664 et moniteur + notice : 
4000 F. Région Rennes (35). Tél. 99.31.21.51HR. 


J'échange 6 de mes jeux (originaux) + la notice 
du CPC 464 (en anglais) contre la notice du CPC 
464 (en français). Tél. 99.57.23.88. 


Vends 464 peu servi + livres (3) + housses + logi- 
ciels : 3600 F. DDI (sous garantie) + disquettes : 
1800 F. Logiciels 50 à 150 F. Tél. 30.51.48.28 
(19h). 


Echange caméra S8 Bauer professionnelle contre 
CPC 6128 couleur, valeurs, état neuf, équivalen- 
tes. M. LAMIC, tél. 92.54:14.91. 


Vend CPC 6128 coul. (sous garantie) + imp. Citi- 
zen 120D + nbx logiciels (util. + jeux) + joystick 
+ 14 revues CPC : 7800 F. Tél. 83.41.29.10. 


Vends CPC 464 couleur + nbx livres + synthé 
vocal + jeux et langage + manette. Le tout : 
3200 F. Tél. 61.41.72.33 après 18h30. 


Vends CPC 464, mono + imprimante + 2 joysticks 
+ crayon optique + synthé voca + nbx logiciels 
+ livres : 4000 F. Tél. 48.81.91.90. 


Vends CPC 6 à 14 : 10 F pièce et AM2 à 14:10F 
pièce + 30 F disquettes 3'’ + jeux originaux. 
David, tél. 20.93.67.24. 

Vends imprimante DMP 1 tbe : 1500 F. Tél. 
42.02.07.54 le soir. 


Achète ou échange pour CPC 464 Transmat ou 
autre copieur cassette disquette. A. HOROCOMBO, 
4 imp. Shumann, 30000 NIMES. 


Vends K7 de jeux sur 464 (Harrier Attack + Hun- 
terkiller + Alien Break-in + Flight Parth 737) : 50 F 
pièce ou 180 F le tout). Tél. 29.39.39.03 après 
19h. 


Suite vente AMSTRAD, vend programmes (utilitai- 
res et jeux) peu servi, pour CPC et PCW. Conan, 
Ansouis, 84240 LA TOUR D'AIGUES. 


Vends CPC 664 + livres + logiciels couleur : 
4500 F. Compta pro Logicys + tableur : 5500 F. 
Tél. Serge 92.58.03.53. 


Vends 6128 coul. + lect. K7 + imprim. + joystick 
+ Tasword + TTXT + 20 disquettes + livres : 
6500 F. M. BENNATO, 91190 GIF, tél. 
60.12.07.25. 


Vends jeux tapés par moi à 5 ou 6 F le jeu (Dollar- 
man, Bombardier, etc.) Vends les 11 à 40 F sans 
K7 (en envoyer une) ou 50 F avec. S. CADINOT, 
34 rue de Montigny, 95660 CHAMPAGNE s/OISE. 


Achète CPC 464 coul. ou mono avec lecteur de dis- 


‘quettes DDI-1 et logiciels à prix raisonnable. Faire 


offre au 89.56.68.44. 


Vends nombreux jeux originaux pour AMSTRAD (K- 
D). Cherche programmes pour synthé Techni- 
Musique. Tél. 51.62.05.15. 


Pour 6128 vends programmes à divers prix sur dis- 
quettes. Tél. 97.65.90.56 après 17 h. 


Vends CPC 464 coul. + lecteur disquettes DDI + 
imprimante DMP 1 + joystick + carte 64K + Zen 
+ 40 jeux + UDos (tbe) : 7000 F. Tél. 


47.88.06.15 (Dept. 92). 


Vends manette de jeu Sony : 100 F. 17 rue des 
Galons, 92190 Meudon, tél. 45.34.60.40. 


Vends AMSTRAD 464 neuf + monit. + adapt. 
périt. + lect. K7 + 300 soft + livres : 2400 F à 
débattre. Eric CARDON, AZE, 71260 LUGNY. 


Vends CPC 664 + ext. 64 k (DK) + jeux + utili- 
taires + langages : 3800 F. Tél. 43.29.79.20 Jean- 
Claude DUPLA (sauf samedi et dimanche) avant 
20h. 


Vends CPC 464 couleur avec 25 jeux + utilitaires 
+ un joystick : 3800 F (sous garantie). Tél. 
30.50.89.25. 


Vends CPC 464 mono + DD1 + DMP 2000 + 
MP1 + joystick avec nbx logiciels, jeux et utilitai- 
res : 5500 F. J. DUGAST, 91 MORSANG., tél. (1) 
60.15.66.40. 


Vends CPC 6128 mono + joystick + livres +.nbx 
programmes (jeux et utilitaires), le tout : 4000 F. 
Ch. BAILLY, tél. 47.88.30.87 Courbevoie. 


Echange clavier 464 + logiciels contre clavier 664 
ou 6128. Thierry MATHIEU, Ecluse 62, 51340 
PARGNY SUR SAULX. 


Vends CPC 6128 monochrome s/garantie 
4200 F. Donne avec câble magnéto + 20 disquet- 
tes pleines + 30 revues. Tél. 78.52.23.90. 


Vends AMSTRAD CPC 464 + moniteur couleur et 
35 logiciels. Le tout : 2900 F. Tél. 43.94.07.61 le 
midi. 


Vends Multiplan 6128/PCW (peu utilisé) : 250 F + 
port. M. CLIVET, 1 rue Courvoisier, 25110 BAUME. 


Vends AMSTRAD 464 coul. neuf sous garantie + 
joy + table + 200 jeux + livres. Pas cher. Pascal 
TORRES, tél. 67.29.41.46 Mauguio (cause achat). 


Vends CPC 464 vert + drive DDI 1 + joystick + 
logiciels + doc. : 3990 F. A. DENIZE, 6 ch. de la 
Gravière, 91610 Ballancourt, tél. (1) 64.93.34.74. 


AMSTRAD Disc cherche contacts pour échanges 
divers. 75 rue des Eglises, 67160 STEINSELTZ. 


Vends originaux disquettes jeux et utilitaires ou 
échange contre utilitaires originaux. Demander 
Thierry au 56.40.94.96. 


Possesseur CPC 6128 cherche contacts, région 
Châteauroux. Hubert, tél. 54.34.48.03. 


PCW 6128 vend originaux DBase, Wordstar, Géné 
Appl. DBase. Patrick SOUCHE, 3 rue Québec, 
44000 NANTES, tél. 40.40.86.38 après 22h. 


CPC 464 et 6128 recherche logiciels nouveaux. 
Tél. 64.00.50.65 (demander Stéphane après 18h). 


Vends ou échange Meurtre sur l'Atlantique, dos- 
sier complet + disc. Faire offre à M. LE REST, 59 
rue Hoche, 78800 HOUILLES. 


Urgent, échange K7 pour CPC 464 : Métro 2018 
+ Ghost'n Goblins contre Billy la Banlieue. Tél. 
34.14.74.98 (demander Stéphane). 


Vends 23 logiciels de jeux originaux en K7 : 
1000 F. M. BIDEAU au 37.42.00.45. 


Vends 464 couleur + logiciel + livre : 3700 F à 
débattre. Seikosha GP 100 : 1500 F. Tél. 
23.68.13.10. 


Vends imprimante Ericsson Facit 4509 standard 
IBM Epson série parallèle Centronics. comp. AMS- 
TRAD : 2500 F. Tél. 45.83.09.11, demander Gior- 
gio. 
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Attention : votre abonnement débutera avec le 
numéro suivant le mois d'envoi de votre chèque. u - 9, 10, 11, 12, 13, 14, 15,1 . : 


Hors Série n° 1 avec cassette 42F 
| Hors Série n° 2 sans cassette 6 F 


Q Abonnement 1 an à 11 numéros 180 F 
[1 Abonnement 6 numéros 104 F 
[] Abonnement d'essai 55 F 


CO Supplément pour tarif avion 120 F : Entourez le (ou les) numéro(s) commandé({s). 
Note : cochez la case abonnement dans le bulletin de commande 


0 A l'écoute des 

x radiotélétypes 

[ abonné 45F 7 J.L. FIS 115F 
© non abonné 55 F Les imprimantes 

{ abonnement cassettes (11 n°) 450 F Michel ARCHAMBAULT 95 F 


Je commande les cassettes n° O 1 exemplaire AMSTAR n° 9 F 


1 cassette représente 1 numéro 


1 disquette contient deux numéros | 
consécutifs de CPC © Mieux programmer sur AMSTRAD 
Q abonné | 110F Michel ARCHAMBAULT 85F 


M han 260hné 140 F [Communiquez avec AMSTRAD 


| D. BONOMO - E. DUTERTRE 90 F 
[ ab ent disquettes (6) 600 F 
SUN pe Ris ©) Jouez avec AMSTRAD 


Je commande les disquettes n° | Kerloch 48 F 
0 Programmes utilitaires pour AMSTRAD 
Michel ARCHAMBAULT .. 85F 
0 L'Univers des PCW 

Patrick LEON 119F 
Pour conserver vos revues intactes. [ Cassette 

A abonné 58 F Communiquez avec AMSTRAD 190 F 


[ non abonné 74F 1] Disquette 
Communiquez avec AMSTRAD 250 F 


TOTAL PORT : 10 % TOTAL GENERAL 


Code Postal 
ABONNEMENT oui non | Signature 


Ciyoint un chèque libellé à l'ordre de : Editions SORACOM. Retournez le(s) bulletin(s) ou une photocopie à : 
Editions SORACOM La Haie de Pan - 35170 BRUZ. 


— Une revue tout en cou- 
leurs pour seulement 
8,50 F. 

— Plein de bancs d'essais 
super , avec des photos 
d'écran et des conseils 
pour jouer. 


sur AMSTRAD. 


tion. 


les kiosques 


— En avant-première, 
toutes les nouveautés 


— Des programmes et 
des articles d'initia- 


— Chaque mois dans 


EURE PCW 8256-8512 


DESCRIPTIF 


CARTE D'IDENTITE 


Mémorise la “carte d'identité” de l’entreprise 
(Nom, Raison Sociale, Date de création, etc.) 


LES TAUX 


Les taux de cotisations patronales et salariale 
$ont fournis suivant la dernière législation et 
sont entièrement modifiables. 


LES UTILITAIRES 


1. GESTION DU FICHIER PERSONNEL 
Les informations concernant chaque salarié 
sont mémorisées sur une fiche signalétique 
unique. C/PAYE peut gérer jusqu'à 30 salarié: 


ANIINIAR À R 0 B A S E 2. CARNET D'ADRESSES 


L'utilisateur dispose à tout moment d’un carnt 
d'adresses utiles à l'établissement de la fich 
de paye et des déclarations aux organismes 
sociaux. 


LE BULLETIN DE PAYE 


1. LE BULLETIN DE PAYE 
Il permet création, édition. impression et 
suppression du bulletin de paye. Les bulletin 
sont modifiables à tout moment, donnant 
à C/PAYE la faculté de s'adapter à tout type 
d'entreprise. L'utilisateur peut donc refaire 
plusieurs fois le même bulletin de paye 
avant sa validation définitive. 


2. COMPTABILITE 
C/PAYE édite automatiquement le livre de pay 
à n'importe quel moment au choix de l'utili- 
sateur. C/PAYE édite automatiquement un 
récapitulatif-entreprise indiquant l'imputation 
comptable des divers éléments pour le mois 
et en cumul. C/PAYE édite automatiquement 
un bordereau de virement des salaires. 
C/PAYE gère les congés payés. 


3. FISCALITE 
Une aide à l'établissement des déclarations 
fiscales est proposée, sous forme d'un état 
reprenant l'essentiel des éléments d’une DADS 


C/PAYE protège l'utilisateur de toute erreur 
de manipulation en autorisant l'utilisation de 
certaines touches du clavier uniquement 
C/PAYE tient compte des dernières modifi- 
cations législatives en particulier en ce qui 
concerne l'embauche des jeunes. 

Enfin, de par l'utilisation des menus déroulant: 
C/PAYE est utilisable par tous, après quelque: 
minutes d'utilisation seulement. 


CONCURENCE 


